use def avoid pref

jcs-elpa · Apr 22, 2024 · 4935006 · 4935006
1 parent e20f6f3
commit 4935006
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/mbs.el b/mbs.el
@@ -40,7 +40,8 @@
   :group 'tools
   :link '(url-link :tag "Repository" "https://github.com/jcs-elpa/mbs"))
 
-(defconst mbs-read-file-name-commands '(read-file-name)
+(defconst mbs-read-file-name-commands
+  `(,(or read-file-name-function #'read-file-name-default))
   "List of command to  detect find file action.")
 
 (defvar mbs-reading-file-name-p nil