changeset 211:f6ba3ca3dbd4

jordi-find-file-with-mode: still under warranty
author Jordi Gutiérrez Hermoso <jordigh@octave.org>
date Tue, 10 Aug 2021 14:32:17 -0400
parents 98ea617c263a
children a6426b4dd0d8
files dotemacs.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/dotemacs.el
+++ b/dotemacs.el
@@ -96,7 +96,7 @@
   "Calls `find-file' to open a file with the given MODE."
   (interactive (list (let ((default "fundamental-mode"))
                        (intern (completing-read
-                                (format-prompt "Mode" default)
+                                "Mode: "
                                 obarray
                                 (lambda (sym)
                                   (string-match-p "-mode\\'" (symbol-name sym)))
@@ -104,6 +104,7 @@
   (cl-letf (((symbol-function 'set-auto-mode)
              (lambda (&rest _) (set-auto-mode-0 mode))))
     (call-interactively 'find-file)))
+
 (add-hook 'org-babel-after-execute-hook 'org-display-inline-images)