Mercurial > emacs
diff lisp/mh-e/mh-e.el @ 67760:9c3504ae6060
Follow MH-E Developers Guide conventions. Use `' quotes for Help
hyperlinks such as symbols, Info nodes, or URLs. Use \" quotes for
everything else. Otherwise, you can accidently get links to
nonsense symbols.
author | Bill Wohler <wohler@newt.com> |
---|---|
date | Fri, 23 Dec 2005 08:40:31 +0000 |
parents | b7b75914a27d |
children | f2d49739378c |
line wrap: on
line diff
--- a/lisp/mh-e/mh-e.el Fri Dec 23 07:47:02 2005 +0000 +++ b/lisp/mh-e/mh-e.el Fri Dec 23 08:40:31 2005 +0000 @@ -139,10 +139,10 @@ additional hints for fontification have been added to the fifth column (remember that in Emacs, the first column is 0). -The values of the fifth column, in priority order, are: `-' if +The values of the fifth column, in priority order, are: \"-\" if the message has been replied to, t if an address on the To: line -matches one of the mailboxes of the current user, `c' if the Cc: -line matches, `b' if the Bcc: line matches, and `n' if a +matches one of the mailboxes of the current user, \"c\" if the Cc: +line matches, \"b\" if the Bcc: line matches, and \"n\" if a non-empty Newsgroups: header is present.") (defvar mh-scan-format-nmh @@ -165,10 +165,10 @@ hints for fontification have been added to the fifth column (remember that in Emacs, the first column is 0). -The values of the fifth column, in priority order, are: `-' if +The values of the fifth column, in priority order, are: \"-\" if the message has been replied to, t if an address on the To: field -matches one of the mailboxes of the current user, `c' if the Cc: -field matches, `b' if the Bcc: field matches, and `n' if a +matches one of the mailboxes of the current user, \"c\" if the Cc: +field matches, \"b\" if the Bcc: field matches, and \"n\" if a non-empty Newsgroups: field is present.") (defvar mh-note-deleted ?D @@ -266,7 +266,7 @@ Note that the default setting of `mh-folder-font-lock-keywords' expects this expression to contain two parenthesized expressions. -The first is expected to match the `To:' that the default scan +The first is expected to match the \"To:\" that the default scan format file generates. The second is expected to match the recipient's name as in the default of \"\\\\(To:\\\\)\\\\(..............\\\\)\". If this regular @@ -289,9 +289,9 @@ It must match from the beginning of the line. Note that the default setting of `mh-folder-font-lock-keywords' expects this expression to contain at least three parenthesized expressions. -The first is expected to match the `Re:' string, if any. The -second matches an optional bracketed number after `Re:', such as -in `Re[2]:' (and is thus a sub-expression of the first +The first is expected to match the \"Re:\" string, if any. The +second matches an optional bracketed number after \"Re:\", such as +in \"Re[2]:\" (and is thus a sub-expression of the first expression) and the third is expected to match the subject line itself as in the default of (broken on multiple lines for readability): @@ -356,26 +356,26 @@ (defvar mh-scan-cmd-note-width 1 "Number of columns consumed by the cmd-note field in `mh-scan-format'. -This column will have one of the values: ` ', `D', `^', `+' and -where ` ' is the default value, - - `D' is the `mh-note-deleted' character, - `^' is the `mh-note-refiled' character, and - `+' is the `mh-note-cur' character.") +This column will have one of the values: \" \", \"D\", \"^\", \"+\" and +where \" \" is the default value, + + \"D\" is the `mh-note-deleted' character, + \"^\" is the `mh-note-refiled' character, and + \"+\" is the `mh-note-cur' character.") (defvar mh-scan-destination-width 1 "Number of columns consumed by the destination field in `mh-scan-format'. -This column will have one of ' ', '%', '-', 't', 'c', 'b', or `n' +This column will have one of \" \", \"%\", \"-\", \"t\", \"c\", \"b\", or \"n\" in it. - ' ' blank space is the default character. - '%' indicates that the message in in a named MH sequence. - '-' indicates that the message has been annotated with a replied field. - 't' indicates that the message contains mymbox in the To: field. - 'c' indicates that the message contains mymbox in the Cc: field. - 'b' indicates that the message contains mymbox in the Bcc: field. - 'n' indicates that the message contains a Newsgroups: field.") + \" \" blank space is the default character. + \"%\" indicates that the message in in a named MH sequence. + \"-\" indicates that the message has been annotated with a replied field. + \"t\" indicates that the message contains mymbox in the To: field. + \"c\" indicates that the message contains mymbox in the Cc: field. + \"b\" indicates that the message contains mymbox in the Bcc: field. + \"n\" indicates that the message contains a Newsgroups: field.") (defvar mh-scan-date-width 5 "Number of columns consumed by the date field in `mh-scan-format'. @@ -383,7 +383,7 @@ (defvar mh-scan-date-flag-width 1 "Number of columns consumed to flag (in)valid dates in `mh-scan-format'. -This column will have ` ' for valid and `*' for invalid or +This column will have \" \" for valid and \"*\" for invalid or missing dates.") (defvar mh-scan-from-mbox-width 17 @@ -778,7 +778,7 @@ a) The folder name associated with the first address found in the list `mh-default-folder-list' is used. Each element in - this list contains a `Check Recipient' item. If this item is + this list contains a \"Check Recipient\" item. If this item is turned on, then the address is checked against the recipient instead of the sender. This is useful for mailing lists. @@ -1370,7 +1370,7 @@ (values (format "+%s" folder) (car unseen) (car total)))))))) (defun mh-folder-size-folder (folder) - "Find size of FOLDER using `folder'." + "Find size of FOLDER using \"folder\"." (with-temp-buffer (let ((u (length (cdr (assoc mh-unseen-seq (mh-read-folder-sequences folder nil)))))) @@ -1382,7 +1382,7 @@ (values 0 u folder))))) (defun mh-folder-size-flist (folder) - "Find size of FOLDER using `flist'." + "Find size of FOLDER using \"flist\"." (with-temp-buffer (call-process (expand-file-name "flist" mh-progs) nil t nil "-showzero" "-norecurse" folder "-sequence" (symbol-name mh-unseen-seq)) @@ -1789,20 +1789,20 @@ Indicates all messages in the range <num1> to <num2>, inclusive. The range must be nonempty. -`<num>:N' -`<num>:+N' -`<num>:-N' +<num>:N +<num>:+N +<num>:-N Up to N messages beginning with (or ending with) message num. Num may be any of the predefined symbols: first, prev, cur, next or last. -`first:N' -`prev:N' -`next:N' -`last:N' +first:N +prev:N +next:N +last:N The first, previous, next or last messages, if they exist. -`all' +all All of the messages. For example, a range that shows all of these things is `1 2 3 @@ -2643,7 +2643,7 @@ (defalias 'mh-alt-send 'mh-send) (defalias 'mh-alt-visit-folder 'mh-visit-folder) -;; Save the `b' binding for a future `back'. Maybe? +;; Save the "b" binding for a future `back'. Maybe? (gnus-define-keys mh-folder-mode-map " " mh-page-msg "!" mh-refile-or-write-again @@ -2793,7 +2793,7 @@ ;; ;; When adding a new prefix, ensure that the help message contains "what" the ;; prefix is for. For example, if the word "folder" were not present in the -;; `F' entry, it would not be clear what these commands operated upon. +;; "F" entry, it would not be clear what these commands operated upon. (defvar mh-help-messages '((nil "[i]nc, [.]show, [,]show all, [n]ext, [p]revious,\n" "[d]elete, [o]refile, e[x]ecute,\n"