• Home
  • History
  • Annotate
  • Raw
  • Download
  • only in /macosx-10.10.1/emacs-93/emacs/lisp/mh-e/

Lines Matching +defs:filter +defs:in

18 ;; GNU Emacs is distributed in the hope that it will be useful,
43 "Return the position of last occurrence of CHAR in STRING.
44 If CHAR is not present in STRING then return nil. The function is
45 used in lieu of `search' in the CL package."
70 "Check if colors are available in the Emacs being used."
76 (defun mh-colors-in-use-p ()
77 "Check if colors are being used in the folder buffer."
100 "List of special characters in pick regular expressions.")
104 "Quote `mh-pick-regexp-chars' in PICK-EXPR.
112 (setq string (mh-replace-regexp-in-string s s string t t))))
118 "Replace all occurrences of OLD with NEW in the current buffer.
138 (mh-do-in-gnu-emacs
151 (mh-do-in-xemacs
236 "Display STRING in the minibuffer momentarily."
247 representing the mode; the value is described in `mh-set-help'.")
254 to show help for the most common commands in the current mode.
256 are concatenated together and displayed in a help buffer if ? is
260 The substitutions described in `substitute-command-keys' are performed as
275 and displayed in a help buffer."
288 "Display cheat sheet for the commands of the current prefix in minibuffer."
385 (mh-exec-cmd-daemon "folders" 'mh-collect-folder-names-filter
388 (defun mh-collect-folder-names-filter (process output)
416 (unless (loop for x in cache-entry when (equal (car x) child1) return t
422 (loop for x in (gethash grand-parent mh-sub-folders-cache)
446 the directories in / if passed \"+\". This is usually not
468 ;; ("+foo" "") while in GNU Emacs it returns ("+foo"). In the
500 number of messages in the sub-folders and too large to be the
527 (setq folder (mh-replace-regexp-in-string "^\+" "" folder))
528 (setq folder (mh-replace-regexp-in-string "/+$" "" folder))
536 (loop for f in (mh-sub-folders folder) do
567 ;; the line. Since a folder in the cache could later be deleted, it
568 ;; would be good for mh-sub-folders-actual to return nil in this case
626 last ancestor of FOLDER present in the cache must be removed as
701 non-nil is a function that is used to filter the possible
766 optional argument DEFAULT-STRING is non-nil, use it in the prompt
769 used in searching."
826 ;; Functions that would ordinarily be in mh-letter.el that are needed
827 ;; by mh-show.el are found here in order to prevent the loading of
831 (defun mh-in-header-p ()
832 "Return non-nil if the point is in the header of a draft message."
847 "Find and return the body of FIELD in the mail header.
848 Returns the empty string if the field is not in the header of the
852 (skip-chars-forward " \t") ;strip leading white space in body
860 "Move to FIELD in the message header.
861 Move to the end of the FIELD name, which should end in a colon.
880 In MH-E we frequently need to find the end of headers in nested
882 in this situation."
888 ;; header. The replacement allows From_ lines in the mail header.
932 (loop for x in mh-compose-skipped-header-fields
938 (mh-do-in-gnu-emacs
940 (mh-do-in-xemacs
954 (when (and (mh-in-header-p)
979 (mh-letter-skip-leading-whitespace-in-header-field))
992 (defun mh-letter-skip-leading-whitespace-in-header-field ()
993 "Skip leading whitespace in a header field.