Compare commits
3 Commits
b568f0faa9
...
ff0a35672e
Author | SHA1 | Date | |
---|---|---|---|
ff0a35672e | |||
a19fecd385 | |||
2050f81860 |
10
mood-line.el
10
mood-line.el
@ -3,7 +3,7 @@
|
||||
;; Author: Jessie Hildebrandt <jessieh.net>
|
||||
;; Homepage: https://gitlab.com/jessieh/mood-line
|
||||
;; Keywords: mode-line faces
|
||||
;; Version: 3.0.0
|
||||
;; Version: 3.0.1
|
||||
;; Package-Requires: ((emacs "26.1"))
|
||||
|
||||
;; This file is not part of GNU Emacs.
|
||||
@ -82,10 +82,8 @@
|
||||
;; -------------------------------------------------------------------------- ;;
|
||||
|
||||
(defmacro mood-line--deflazy (name)
|
||||
"Define dummy function NAME to `require' its module and call actual function.
|
||||
If NAME is already bound, this does nothing."
|
||||
(when-let ((not-bound (not (fboundp name)))
|
||||
(module (intern (car (split-string (symbol-name name) "--")))))
|
||||
"Define dummy function NAME to `require' its module and call actual function."
|
||||
(let ((module (intern (car (split-string (symbol-name name) "--")))))
|
||||
`(defun ,name (&rest args)
|
||||
"Not yet loaded."
|
||||
(fmakunbound (quote ,name))
|
||||
@ -401,7 +399,7 @@ See `mood-line-defformat' for a helpful formatting macro."
|
||||
;;
|
||||
;; -------------------------------------------------------------------------- ;;
|
||||
|
||||
(defvar mood-line--escape-buffer (get-buffer-create " *mood-line*" t)
|
||||
(defvar mood-line--escape-buffer (get-buffer-create " *mood-line*")
|
||||
"Buffer used by `mood-line--escape'.")
|
||||
|
||||
(defun mood-line--escape (&rest strings)
|
||||
|
Loading…
Reference in New Issue
Block a user