From a44aa4c9ea49924db712779efc65985dfd710b8b Mon Sep 17 00:00:00 2001 From: benjamin Date: Wed, 31 Jan 2018 23:51:03 +0100 Subject: rename --- feebleline.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/feebleline.el b/feebleline.el index ec766fd..e15718b 100644 --- a/feebleline.el +++ b/feebleline.el @@ -132,7 +132,7 @@ sent to `add-text-properties'.") text)) (defvar feebleline-placeholder) -(defun feebleline-message-buffer-file-name-or-nothing () +(defun feebleline-write-buffer-name-maybe () "Replace echo-area message with mode-line proxy." (progn (setq feebleline-placeholder (mapconcat #'feebleline--mode-line-part feebleline-mode-line-text "")) @@ -144,13 +144,13 @@ sent to `add-text-properties'.") (defun feebleline-mode-line-proxy-fn () "Put a mode-line proxy in the echo area *if* echo area is empty." (unless (current-message) - (feebleline-message-buffer-file-name-or-nothing))) + (feebleline-write-buffer-name-maybe))) (defadvice handle-switch-frame (after switch-frame-message-name) "Get the modeline proxy to work with i3 switch focus." - (feebleline-message-buffer-file-name-or-nothing) + (feebleline-write-buffer-name-maybe) ad-do-it - (feebleline-message-buffer-file-name-or-nothing)) + (feebleline-write-buffer-name-maybe)) (provide 'feebleline) ;;; feebleline.el ends here -- cgit v1.2.3