1 files changed, 5 insertions, 25 deletions
diff --git a/tests/test-ui-theme-commands.el b/tests/test-ui-theme-commands.el
index 55facc17e..1b273cf57 100644
--- a/tests/test-ui-theme-commands.el
+++ b/tests/test-ui-theme-commands.el
@@ -7,7 +7,6 @@
 ;;   cj/switch-themes
 ;;   cj/save-theme-to-file
 ;;   cj/get-active-theme-name
-;;   cj/load-fallback-theme
 
 ;;; Code:
 
@@ -36,13 +35,11 @@
 
 ;;; fallback-theme-name default
 
-(ert-deftest test-ui-theme-default-fallback-is-bundled-dupre ()
-  "Normal: the default fallback theme is dupre, the config's bundled theme.
-modus-vivendi ships with Emacs but has no chosen dimming colors; dupre is
-bundled in themes/, so it is available on every machine that loads this
-config and is the right default fallback.  Its loadability is covered by
-test-dupre-theme.el."
-  (should (equal "dupre" (default-value 'fallback-theme-name))))
+(ert-deftest test-ui-theme-default-fallback-is-builtin-modus ()
+  "Normal: the default fallback theme is modus-vivendi.
+The fallback has no further fallback, so it must be present everywhere this
+config loads.  modus-vivendi ships with Emacs, so it always resolves."
+  (should (equal "modus-vivendi" (default-value 'fallback-theme-name))))
 
 ;;; cj/save-theme-to-file
 
@@ -70,23 +67,6 @@ does not raise."
       (cj/save-theme-to-file))
     (should (string-match-p "Cannot save theme" messaged))))
 
-;;; cj/load-fallback-theme
-
-(ert-deftest test-ui-theme-load-fallback-disables-then-loads ()
-  "Normal: load-fallback-theme disables all then loads the fallback."
-  (let ((fallback-theme-name "modus-vivendi")
-        (custom-enabled-themes '(old-one old-two))
-        disabled loaded)
-    (cl-letf (((symbol-function 'disable-theme)
-               (lambda (theme) (push theme disabled)))
-              ((symbol-function 'load-theme)
-               (lambda (theme &optional _no-confirm _no-enable)
-                 (push theme loaded)))
-              ((symbol-function 'message) #'ignore))
-      (cj/load-fallback-theme "boom"))
-    (should (equal (sort (copy-sequence disabled) #'string<) '(old-one old-two)))
-    (should (equal loaded '(modus-vivendi)))))
-
 ;;; cj/switch-themes
 
 (ert-deftest test-ui-theme-switch-disables-loads-then-saves ()