Compare commits
No commits in common. "ff0a35672e57169bc004ccd8f4a7b6fceec5e93d" and "b568f0faa9e143eafb38016e63715a9ecc7c6c69" have entirely different histories.
ff0a35672e
...
b568f0faa9
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.1
|
||||
;; Version: 3.0.0
|
||||
;; Package-Requires: ((emacs "26.1"))
|
||||
|
||||
;; This file is not part of GNU Emacs.
|
||||
@ -82,8 +82,10 @@
|
||||
;; -------------------------------------------------------------------------- ;;
|
||||
|
||||
(defmacro mood-line--deflazy (name)
|
||||
"Define dummy function NAME to `require' its module and call actual function."
|
||||
(let ((module (intern (car (split-string (symbol-name 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) "--")))))
|
||||
`(defun ,name (&rest args)
|
||||
"Not yet loaded."
|
||||
(fmakunbound (quote ,name))
|
||||
@ -399,7 +401,7 @@ See `mood-line-defformat' for a helpful formatting macro."
|
||||
;;
|
||||
;; -------------------------------------------------------------------------- ;;
|
||||
|
||||
(defvar mood-line--escape-buffer (get-buffer-create " *mood-line*")
|
||||
(defvar mood-line--escape-buffer (get-buffer-create " *mood-line*" t)
|
||||
"Buffer used by `mood-line--escape'.")
|
||||
|
||||
(defun mood-line--escape (&rest strings)
|
||||
|
Loading…
Reference in New Issue
Block a user