summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorKyle Meyer <kyle@kyleam.com>2015-09-23 23:28:26 -0400
committerKyle Meyer <kyle@kyleam.com>2015-09-23 23:28:26 -0400
commitfbd67b4b6dc4b3df1ab10421665bc58ad52974a5 (patch)
treea44185f04bbaa8074734d428c8a01e2a3f204b1f /lisp
parent55353a519ff4ee6aedc6c4ef547a42361d43ea09 (diff)
downloademacs.d-fbd67b4b6dc4b3df1ab10421665bc58ad52974a5.tar.gz
Revert "Remove pointless message format strings"
Never mind. I think I used this just in case the string contained '%'.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/init-bib.el2
-rw-r--r--lisp/init-dired.el2
-rw-r--r--lisp/init-mail.el2
-rw-r--r--lisp/init-projectile.el2
4 files changed, 4 insertions, 4 deletions
diff --git a/lisp/init-bib.el b/lisp/init-bib.el
index 06d59d9..b3e82da 100644
--- a/lisp/init-bib.el
+++ b/lisp/init-bib.el
@@ -151,7 +151,7 @@ point. The link is opened using the settings of
"Copy DOI at point to kill ring."
(interactive)
(-when-let (doi (km/doi-at-point))
- (kill-new (message (concat "doi:" doi)))))
+ (kill-new (message "%s" (concat "doi:" doi)))))
(defun km/doi-at-point ()
"Return DOI at point."
diff --git a/lisp/init-dired.el b/lisp/init-dired.el
index 0d195d1..2c2577d 100644
--- a/lisp/init-dired.el
+++ b/lisp/init-dired.el
@@ -163,7 +163,7 @@ relative to DIRECTORY."
(if (eq last-command 'kill-region)
(kill-append string nil)
(kill-new string))
- (message string)))
+ (message "%s" string)))
(defun km/other-default-directory ()
"Get `default-directory' for result of `(other-window 1)'."
diff --git a/lisp/init-mail.el b/lisp/init-mail.el
index 9c53d1d..0ef158a 100644
--- a/lisp/init-mail.el
+++ b/lisp/init-mail.el
@@ -214,7 +214,7 @@ to group buffer instead of moving to next group."
(defun km/notmuch-show-copy-message-id-as-kill ()
(interactive)
- (kill-new (message (notmuch-show-get-message-id))))
+ (kill-new (message "%s" (notmuch-show-get-message-id))))
(define-key notmuch-hello-mode-map "o" 'km/ace-link-widget)
diff --git a/lisp/init-projectile.el b/lisp/init-projectile.el
index 7c225e6..2a20e7f 100644
--- a/lisp/init-projectile.el
+++ b/lisp/init-projectile.el
@@ -67,7 +67,7 @@ use the name of the current file."
(if (eq last-command 'kill-region)
(kill-append fname nil)
(kill-new fname))
- (message fname)))
+ (message "%s" fname)))
(defvar km/projectile-project-saved-thing nil
"Property list of saved thing for projects.