mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-07 04:10:27 -08:00
Code Issues Projects Releases Wiki Activity

* mh-utils.el:

Browse source 
* mh-mime.el: Shush XEmacs compiler in mh-do-in-xemacs block.
This commit is contained in:
Bill Wohler 2011-07-03 14:30:28 -07:00
parent 2a7a7c1499
commit feb4cf5825
2 changed files with 4 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/mh-e/mh-mime.el
View file

@ -835,7 +835,7 @@ being used to highlight the signature in a MIME part."
;;; Button Display
;; Shush compiler.
(when (featurep 'xemacs)
(mh-do-in-xemacs
(defvar dots)
(defvar type)
(defvar ov))

5
lisp/mh-e/mh-utils.el
View file

@ -732,8 +732,9 @@ See Info node `(elisp) Programmed Completion' for details."
(t (file-directory-p path))))))))
;; Shush compiler.
(defvar completion-root-regexp) ; XEmacs
(defvar minibuffer-completing-file-name) ; XEmacs
(mh-do-in-xemacs
(defvar completion-root-regexp)
(defvar minibuffer-completing-file-name))
(defun mh-folder-completing-read (prompt default allow-root-folder-flag)
"Read folder name with PROMPT and default result DEFAULT.