autoload my-dark-theme and my-light-theme

semenInRussia · Jun 18, 2024 · 66f7d5e · 66f7d5e
1 parent be5c60b
commit 66f7d5e
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 6 deletions.
diff --git a/lisp/ui/my-dark-theme.el → lisp/local-projects/my-dark-theme.el b/lisp/ui/my-dark-theme.el → lisp/local-projects/my-dark-theme.el
@@ -11,6 +11,7 @@
 
 ;;; Code:
 
+;;;###autoload
 (defun my-dark-theme ()
   "Load dark theme."
   (interactive)

diff --git a/lisp/ui/my-light-theme.el → lisp/local-projects/my-light-theme.el b/lisp/ui/my-light-theme.el → lisp/local-projects/my-light-theme.el
@@ -11,6 +11,7 @@
 
 ;;; Code:
 
+;;;###autoload
 (defun my-light-theme ()
   "Load light theme."
   (interactive)

diff --git a/lisp/ui/my-modeline.el b/lisp/ui/my-modeline.el
@@ -55,12 +55,7 @@
   ;; I need only to time (not date) in 24hour format
   (defvar display-time-format) ;; make compile happy
   (setq display-time-format "%H:%M")
-
-  (advice-add 'toggle-frame-fullscreen
-              :after
-              (defun my-toggle-display-time-mode (&rest args)
-                (ignore args)
-                (display-time-mode 'toggle)))
+  (display-time-mode t)
 
   ;; disable show line and column numbers in modeline, because it only
   ;; take off extra place