Lines Matching defs:folder
60 "Display message\\<mh-folder-mode-map>.
91 "Display message with all header fields\\<mh-folder-mode-map>.
127 (let ((folder mh-current-folder)
128 (folders (list mh-current-folder))
137 (equal (mh-msg-filename msg folder) buffer-file-name))
142 (mh-display-msg msg folder)))
184 First argument is folder name. Second is message number.")
187 (defun mh-display-msg (msg-num folder-name)
190 (let ((folder (mh-msg-folder folder-name)))
191 (set-buffer folder)
193 ;; we will delete these handles when mh-quit is called on the folder. It
198 ;; Bind variables in folder buffer in case they are local
203 (msg-filename (mh-msg-filename msg-num folder-name))
266 (setq mh-show-folder-buffer folder)
269 folder-name msg-num)))
271 (set-buffer folder)
274 (defun mh-msg-folder (folder-name)
276 folder-name)
345 ;; Infrastructure to generate show-buffer functions from folder functions
348 ;; folder buffer after the operation has been carried out.
351 "Define FUNCTION to run ORIGINAL-FUNCTION in folder buffer.
355 ,(format "Calls %s from the message's folder.\n%s\nSee \"%s\" for more info.\n"
362 (when (buffer-live-p (get-buffer mh-show-folder-buffer))
364 (folder-buffer mh-show-folder-buffer)
367 (pop-to-buffer mh-show-folder-buffer nil)
370 folder-buffer)
378 (when (eq major-mode 'mh-folder-mode)
390 ;; folder functions.
418 (mh-defun-show-buffer mh-show-inc-folder mh-inc-folder)
426 (mh-defun-show-buffer mh-show-sort-folder mh-sort-folder)
427 (mh-defun-show-buffer mh-show-visit-folder mh-visit-folder t)
428 (mh-defun-show-buffer mh-show-rescan-folder mh-rescan-folder)
429 (mh-defun-show-buffer mh-show-pack-folder mh-pack-folder)
430 (mh-defun-show-buffer mh-show-kill-folder mh-kill-folder t)
432 (mh-defun-show-buffer mh-show-undo-folder mh-undo-folder)
456 (mh-defun-show-buffer mh-show-toggle-mime-part mh-folder-toggle-mime-part)
457 (mh-defun-show-buffer mh-show-save-mime-part mh-folder-save-mime-part)
458 (mh-defun-show-buffer mh-show-inline-mime-part mh-folder-inline-mime-part)
469 (mh-defun-show-buffer mh-show-index-visit-folder mh-index-visit-folder t)
493 mh-show-sequence-menu mh-show-mode-map "Menu for MH-E folder-sequence."
506 (set-buffer mh-show-folder-buffer)
516 mh-show-message-menu mh-show-mode-map "Menu for MH-E folder-message."
548 mh-show-folder-menu mh-show-mode-map "Menu for MH-E folder."
550 ["Incorporate New Mail" mh-show-inc-folder t]
553 ["Rescan Folder" mh-show-rescan-folder t]
555 ["Pack Folder" mh-show-pack-folder t]
556 ["Sort Folder" mh-show-sort-folder t]
559 ["Visit a Folder..." mh-show-visit-folder t]
592 "i" mh-show-inc-folder
606 "v" mh-show-index-visit-folder
609 (gnus-define-keys (mh-show-folder-map "F" mh-show-mode-map)
612 "S" mh-show-sort-folder
614 "f" mh-show-visit-folder
615 "k" mh-show-kill-folder
618 "o" mh-show-visit-folder
620 "r" mh-show-rescan-folder
623 "u" mh-show-undo-folder
624 "v" mh-show-visit-folder)
840 See also `mh-folder-mode'.
875 (easy-menu-add mh-show-folder-menu)
876 (make-local-variable 'mh-show-folder-buffer)