Lines Matching +defs:end +defs:of +defs:output
9 ;; This file is part of GNU Emacs.
12 ;; it under the terms of the GNU General Public License as published by
17 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
21 ;; You should have received a copy of the GNU General Public License
158 This variable can also be a list of regexps of headers to be ignored.
168 This variable can also be a list of regexp of headers to remain visible.
181 "*This variable is a list of regular expressions.
218 only of boring text. Boring text is controlled by
226 This can also be a list of regexps. In that case, it will be checked
228 the end of the buffer."
231 (repeat :tag "List of regexp" regexp))
292 "Alist of regexps (to match group names) and banner."
311 "Alist of mail addresses and banners.
313 to match a mail address in the From: header, BANNER is one of a symbol
422 (boolean :format "Show start and end patterns: %[%v%]\n"
436 The former avoids underlining of leading and trailing whitespace,
484 "Format for display of Date headers in article bodies.
496 This will be overridden by the `:headers' property that the symbol of
507 saving large batches of articles. If this variable is neither nil not
509 each invocation of the saving commands."
521 that the symbol of the saver function, which is specified by
528 The function will be called by way of the `gnus-summary-save-article'
542 The symbol of each function may have the following properties:
557 The value specifies the symbol of a variable of which the value
596 buffer to a file if the value of this variable is non-nil. Note that
649 value is a list of possible files to save in if the match is non-nil.
653 from the buffer of the article to be saved with the newsgroup as the
667 beginning of a line."
678 %m The number of MIME parts in the article."
695 "*Hook run after the creation of the article mode menu."
710 An article button is a piece of text that you can activate by pressing
820 "*Controls highlighting of article headers.
822 An alist of the form (HEADER NAME CONTENT).
824 HEADER is a regular expression which should match the name of a
827 The name of each header field will be displayed using the face
882 "List of MIME types that should be ignored by Gnus."
888 "List of MIME types that should not be given buttons when rendered inline.
896 "List of MIME types that should be given buttons when rendered inline.
900 this list to display radio buttons that allow you to choose one of two
927 "Defines the location of the faces database.
928 For information on obtaining this database of pretty pictures, please
954 "An alist of MIME types to functions to display them."
997 "An alist of actions that run on the MIME attachment."
1250 "Strip the X-No-Archive header line from the beginning of the body.
1442 "Draw a boundary at the end of the headers.
1523 "Whether IDNA decoding of headers is used when viewing messages.
1622 (defvar gnus-number-of-articles-to-be-saved nil)
1672 "Hide text of TYPE between B and E."
1678 "Unhide text of TYPE between B and E."
1686 (defun gnus-article-hide-text-of-type (type)
1687 "Hide text of TYPE in the current buffer."
1694 (defun gnus-article-delete-text-of-type (type)
1695 "Delete text of TYPE in the current buffer."
1708 (end-of-line)
1727 "Say whether any text of type TYPE exists in the buffer."
1731 "Give the rank of the string HEADER as given by `gnus-sorted-header-list'."
1777 ;; Hide any "From " lines at the beginning of (mail) articles.
1782 ;; Then treat the rest of the header lines.
1788 (beginning-of-line)
1789 ;; Mark the rank of the header.
1808 "Toggle hiding of headers that aren't very interesting.
1832 (end-of-line)
1962 (end-of-line)
1969 "Length of normalized headers.")
1983 (end-of-line)
2007 you're expecting some kind of apostrophe or quotation mark, then
2013 "Translate all characters in the body of the article according to FROM and TO.
2014 FROM is a string of characters to translate from; to is a string of
2030 "Translate all string in the body of the article according to MAP.
2100 "Toggle display of textual emoticons (\"smileys\") as small graphical icons."
2134 "Place a boundary line at the end of the headers."
2160 (end-of-line)
2379 end start)
2383 (setq end (point))
2393 (funcall gnus-decode-address-function start end)
2394 (funcall gnus-decode-header-function start end))
2395 (goto-char (setq end start)))))
2648 (delete-region (match-beginning 2) (match-end 0))
2649 (beginning-of-line))
2652 (delete-region (match-beginning 1) (match-end 1))))))))
2655 "Toggle hiding of any PEM headers and signatures in the current article.
2661 (let ((inhibit-read-only t) end)
2667 (setq end (1+ (match-beginning 0))))
2670 end
2672 (match-end 0)
2679 (match-beginning 0) (match-end 0) 'pem)))))))
2726 (delete-region (match-beginning 0) (match-end 0)))))
2729 (delete-region (match-beginning 0) (match-end 0)))))))))
2740 (end (point-max))
2741 (orig (buffer-substring start end))
2744 (narrow-to-region start end)
2745 (delete-region start end)
2772 "Remove all blank lines from the beginning of the article."
2783 "Narrow the buffer to the head of the message.
2784 Point is left at the beginning of the narrowed-to region."
2793 "Place point at the start of the body."
2816 (match-beginning 0) (match-end 0))
2822 (match-beginning 0) (match-end 0))
2823 (delete-region (match-beginning 1) (match-end 1)))))))
2826 "Remove all white space from the beginning of the lines in the article."
2836 "Remove all white space from the end of the lines in the article."
2890 Put point at the beginning of the signature separator."
2932 "Say whether the current buffer contains hidden text of type TYPE."
2944 "Show all hidden text of type TYPE.
2945 Originally it is hide instead of DUMMY."
2965 "Move point to the start of the next header.
2977 If TYPE is `local', convert to local time; if it is `lapsed', output
2978 how much time has lapsed since DATE. For `lapsed', the value of
3036 (beginning-of-line)
3038 (put-text-property (match-beginning 1) (1+ (match-end 1))
3040 (put-text-property (match-beginning 2) (match-end 2)
3047 "Return a DATE line of TYPE."
3124 ;; It's big enough, so we output it.
3151 " of "
3238 (match-end 0))))
3268 (delete-region (match-beginning 1) (match-end 1)))))))
3296 (match-beginning invisible) (match-end invisible) props)
3298 (match-beginning visible) (match-end visible) 'emphasis)
3300 (match-beginning visible) (match-end visible) 'face face)
3302 (goto-char (match-end invisible)))))))))
3335 ;; of the `:headers' property that the saver function might have.
3356 (gnus-number-of-articles-to-be-saved
3384 (if (and gnus-number-of-articles-to-be-saved
3385 (> gnus-number-of-articles-to-be-saved 1))
3387 gnus-number-of-articles-to-be-saved)
3421 ;; A list of splits was found.
3452 "Return the first instance of an \"Archive-name\" in the current buffer."
3459 "If GROUP is an nndoc group, return the name of the parent group."
3475 (gnus-output-to-rmail filename))))
3493 (rmail-output-to-rmail-file filename t)
3494 (gnus-output-to-mail filename)))))
3514 (gnus-output-to-file filename))))
3548 (gnus-output-to-file filename))))
3575 (if (and gnus-number-of-articles-to-be-saved
3576 (> gnus-number-of-articles-to-be-saved 1))
3578 gnus-number-of-articles-to-be-saved)
3741 (put-text-property (match-beginning 1) (1+ (match-end 1))
3743 (put-text-property (match-end 0) (point-max)
3836 "<" beginning-of-buffer
3837 ">" end-of-buffer
3943 "Regexp matching any of the regexps from `gnus-button-alist'.")
3945 "The value of `gnus-button-alist' when `gnus-button-regexp' was build.")
3954 (substring name (match-end 0))))))
4005 ;; Set article window start at LINE, where LINE is the number of lines
4006 ;; from the head of the article.
4154 "Format of the MIME buttons.
4161 %l The length of the encoded part
4235 "Construct a context-sensitive menu of MIME commands."
4267 (error "The current group does not support deleting of parts"))
4283 ;; Add a filename for the sake of saving the part again.
4338 (error "The current group does not support deleting of parts"))
4375 ;; FIXME: maybe some of the following code (borrowed from
4990 If t, it overrides nil values of
5101 ;; Remember modify the number of forward lines.
5276 "Alist of strings describing wash status in the mode line.
5287 "Return a string which display status of article washing."
5309 "Add a washing of TYPE to the current status."
5313 "Add a washing of TYPE to the current status."
5317 "Add IMAGE of CATEGORY to the list of displayed images."
5345 (defun gnus-output-to-file (file-name)
5348 text and used as the value of the coding cookie which is added to the
5349 top of a file. Otherwise, this function saves a raw article without
5367 (delete-region (match-beginning 0) (match-end 0))))
5370 ;; Append newline at end of the buffer as separator, and then
5415 (goto-char (match-end 0))
5440 "Show the next page of the article."
5448 "Show the previous page of the article."
5457 ;; "Show the next page of the article."
5463 ;; "Show the next page of the article."
5469 "Show the next page of the current article.
5470 If end of article, return non-nil. Otherwise return nil.
5475 (end-of-line)
5484 (eobp)))) ;Real end-of-buffer?
5495 (defmacro gnus-article-beginning-of-window ()
5496 "Move point to the beginning of the window.
5516 ;; too many number of lines if `scroll-margin' is set as two or greater.
5523 (end-of-buffer
5524 ;; Long lines may cause an end-of-buffer error.
5526 (gnus-article-beginning-of-window))
5529 "Show previous page of current article.
5535 (not (save-restriction (widen) (bobp)))) ;Real beginning-of-buffer?
5544 (beginning-of-buffer
5546 (gnus-article-beginning-of-window))))
5550 Something \"interesting\" is a word of at least two letters that does
5617 (error "Command invoked outside of a Gnus article buffer")))
5704 "Display documentation of the function invoked by KEY. KEY is a string."
5725 "Display documentation of the function invoked by KEY. KEY is a string."
5829 ;; message-id and request it by id instead of number.
6035 "\C-a" message-beginning-of-line
6083 If FORCE is non-nil, allow editing of articles even in read-only
6099 "Start editing the contents of the current article buffer."
6111 (gnus-message 6 "C-c C-c to end edits")))
6169 "Interactively repair spacing at end of sentences."
6203 "Regular expression that matches a localpart of mail addresses or MIDs."
6219 "Top directory of a CTAN \(Comprehensive TeX Archive Network\) archive.
6253 It should match all directories in the top level of `gnus-ctan-url'."
6270 of the symbols `mid' or `mail', Gnus will always assume that the string is a
6326 ;; ^[^0-9]+[0-9]{1,3}\@ digits only at end of local part
6335 "An alist of \(RATE . REGEXP\) pairs for `gnus-button-mid-or-mail-heuristic'.
6353 (gnus-message 8 "`%s', length of local part=`%s'." mid-or-mail lpartlen)
6421 ;; get rid of surrounding angles...
6446 ;; FIXME: Maybe we should merge some of the functions that do quite similar
6468 (t (gnus-message 3 "`%s' is not a known function of variable." url)))))
6684 ;; all kind of allowed MIDs or mail addresses. Domain part must contain
6686 ;; (info|name|...). Put this entry near the _end_ of `gnus-button-alist'
6690 "*Alist of regexps matching buttons in article bodies.
6695 BUTTON: is the number of the regexp grouping actually matching the button,
6699 PAR: is a number of a regexp grouping whose text will be passed to CALLBACK.
6701 CALLBACK can also be a variable, in that case the value of that
6729 "*Alist of headers and regexps to match buttons in article heads.
6754 call it with the value of the `gnus-data' text property."
6767 call it with the value of the `gnus-data' text property."
6820 (beginning-of-line)
6853 (end (set-marker (make-marker) (1+ (match-end 0)))))
6854 (gnus-article-add-button start (1- end) 'gnus-signature-toggle
6855 end)))))))
6862 "Find external references in the article and make buttons of them.
6881 (match-end (nth 1 entry))
6893 (end (and entry (match-end (nth 1 entry))))
6898 start end 'gnus-callback)))
6902 start end 'gnus-button-push
6906 ;; Add buttons to the head of an article.
6908 "Add buttons to the head of the article."
6917 entry beg end)
6927 (setq end (or (and (re-search-forward "^[^ \t]" nil t)
6931 (while (re-search-forward (eval (nth 1 entry)) end t)
6935 (end (match-end (nth 1 entry)))
6937 (goto-char (match-end 0))
6940 start end (nth 3 entry)
6942 (match-end (nth 4 entry)))))))
6943 (goto-char end)))))))
6968 (defun gnus-signature-toggle (end)
6973 (if (text-property-any end (point-max) 'article-type 'signature)
6977 'article-type 'signature end (point-max)
6982 'article-type nil end (point-max)
7029 (goto-char (match-end 0)))
7035 (goto-char (match-end 0)))
7138 (nntp-port-number ,(if (match-end 3)
7142 (and (match-end 6) (list (string-to-number (match-string 6 address))))))))
7153 val (gnus-url-unhex-string (substring cur (match-end 0) nil) t))
7284 "List of methods used to decode headers.
7286 This variable is a list of FUNCTION or (REGEXP . FUNCTION). If item
7299 (defun gnus-multi-decode-header (start end)
7316 (narrow-to-region start end)
7475 (defvar gnus-mime-security-button-end-line-format "%{%([[End of %t]%D]%)%}\n"
7633 gnus-mime-security-button-end-line-format))