Fix custom docstrings
The first line has to be a complete sentence, because it is displayed in the Customize interface.
This commit is contained in:
parent
1973b1a30e
commit
424ada79fe
|
@ -1,19 +1,16 @@
|
||||||
(defface ido-mini-unsaved-buffer
|
(defface ido-mini-unsaved-buffer
|
||||||
'((t (:foreground "orange")))
|
'((t (:foreground "orange")))
|
||||||
"Face used by `ido-mini' to indicate buffers which have
|
"Face used by `ido-mini' to indicate buffers which have been edited but not saved."
|
||||||
been edited but not saved."
|
|
||||||
:group 'ido-mini)
|
:group 'ido-mini)
|
||||||
|
|
||||||
(defface ido-mini-buffer-changed
|
(defface ido-mini-buffer-changed
|
||||||
'((t (:foreground "red" :background "black")))
|
'((t (:foreground "red" :background "black")))
|
||||||
"Face used by `ido-mini' to indicate buffers whose file has
|
"Face used by `ido-mini' to indicate buffers whose file has been edited outside Emacs."
|
||||||
been edited outside Emacs."
|
|
||||||
:group 'ido-mini)
|
:group 'ido-mini)
|
||||||
|
|
||||||
(defface ido-mini-buffer-file-missing
|
(defface ido-mini-buffer-file-missing
|
||||||
'((t (:foreground "Indianred2")))
|
'((t (:foreground "Indianred2")))
|
||||||
"Face used by `ido-mini' to indicate buffers whose file does
|
"Face used by `ido-mini' to indicate buffers whose file does not exist on disk."
|
||||||
not exist on disk."
|
|
||||||
:group 'ido-mini)
|
:group 'ido-mini)
|
||||||
|
|
||||||
(provide 'ido-mini-faces)
|
(provide 'ido-mini-faces)
|
||||||
|
|
|
@ -9,8 +9,8 @@
|
||||||
;; - toggle displaying paths with buffer names
|
;; - toggle displaying paths with buffer names
|
||||||
|
|
||||||
(defun ->list (var functions)
|
(defun ->list (var functions)
|
||||||
"Assuming FUNCTIONS is a list of functions (FN1 FN2 FN3),
|
"Assuming FUNCTIONS is a list of functions (FN-1 FN-2 ... FN-N),
|
||||||
return the result of (FN3 (FN2 (FN1 VAR)))"
|
return the result of (FN-N ... (FN-2 (FN-1 VAR)))"
|
||||||
;; (--reduce-from (funcall it acc) var functions)
|
;; (--reduce-from (funcall it acc) var functions)
|
||||||
(dolist (fn functions)
|
(dolist (fn functions)
|
||||||
(setq var (funcall fn var)))
|
(setq var (funcall fn var)))
|
||||||
|
|
Loading…
Reference in New Issue