TakeV/spacemacs
Archived
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

minor elisp convention fix

Browse source
This commit is contained in:
deb0ch 2017-01-31 17:54:19 +01:00
parent 1a5579db6f
commit a23761c383
1 changed files with 4 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
core/core-spacemacs-buffer.el
View file

@ -544,7 +544,8 @@ If MESSAGEBUF is not nil then MSG is also written in message buffer."
(goto-char (point-max))
(let ((buffer-read-only nil))
(insert msg)
(if messagebuf (message "(Spacemacs) %s" msg)))))
(when messagebuf
(message "(Spacemacs) %s" msg)))))
(defun spacemacs-buffer/replace-last-line (msg &optional messagebuf)
"Replace the last line of the spacemacs buffer with MSG.
@ -554,7 +555,8 @@ If MESSAGEBUF is not nil then MSG is also written in message buffer."
(let ((buffer-read-only nil))
(delete-region (line-beginning-position) (point-max))
(insert msg)
(if messagebuf (message "(Spacemacs) %s" msg)))))
(when messagebuf
(message "(Spacemacs) %s" msg)))))
(defun spacemacs-buffer/loading-animation ()
"Display the progress bar by chunks of size `spacemacs--loading-dots-chunk-threshold'."