summaryrefslogtreecommitdiff
path: root/elisp
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2024-05-23 01:28:48 +0100
committerjao <jao@gnu.org>2024-05-23 01:28:48 +0100
commit93daa64dbe33e563d2933cafcfe55a00f3874954 (patch)
treec4b834e509d7c43f6bf9165563912d6881bbfe96 /elisp
parent241f16327f43218635c38eb21412cf0ba30975c2 (diff)
downloadgeiser-93daa64dbe33e563d2933cafcfe55a00f3874954.tar.gz
geiser-93daa64dbe33e563d2933cafcfe55a00f3874954.tar.bz2
fix: message takes a format string as first argument
Diffstat (limited to 'elisp')
-rw-r--r--elisp/geiser-base.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/elisp/geiser-base.el b/elisp/geiser-base.el
index 6d6277f..5436224 100644
--- a/elisp/geiser-base.el
+++ b/elisp/geiser-base.el
@@ -1,6 +1,6 @@
;;; geiser-base.el --- shared bits -*- lexical-binding: t -*-
-;; Copyright (C) 2009, 2010, 2012, 2013, 2015, 2016, 2019 Jose Antonio Ortega Ruiz
+;; Copyright (C) 2009, 2010, 2012, 2013, 2015, 2016, 2019, 2024 Jose Antonio Ortega Ruiz
;; This program is free software; you can redistribute it and/or
;; modify it under the terms of the Modified BSD License. You should
@@ -71,7 +71,7 @@
(let ((msg (make-symbol "msg")))
`(let ((,msg (current-message)))
,@body
- (message ,msg))))
+ (message "%s" ,msg))))
(put 'geiser--save-msg 'lisp-indent-function 0)