Lines Matching +defs:gnus +defs:select +defs:article +defs:hook
71 (require 'gnus-sum)
159 S-<cursor movement> is also used for example by `CUA-mode' to select text.
376 this way, `org-cycle-hook' is disables temporarily, to make sure the
398 (defcustom org-cycle-hook '(org-cycle-hide-archived-subtrees
401 The function(s) in this hook must accept a single argument which indicates
407 :type 'hook)
450 (defcustom org-insert-heading-hook nil
486 (defcustom org-occur-hook '(org-first-headline-recenter)
491 :type 'hook)
1022 (gnus . gnus-other-frame)
1032 `gnus'
1033 `gnus-other-frame'
1048 (cons (const gnus)
1050 (const gnus)
1051 (const gnus-other-frame)))
1243 element is a character, a unique key to select this template.
1270 link type that is created. For example, calling `remember' in emails or gnus
1282 gnus | %:group, for messages also all email fields
1350 (defcustom org-after-todo-state-change-hook nil
1355 :type 'hook)
1525 character that is used to select that tag through the fast-tag-selection
1537 This is a special interface to select and deselect tags with single keys.
1836 (defcustom org-finalize-agenda-hook nil
1839 :type 'hook)
3309 (defvar gnus-other-frame-object)
3310 (defvar gnus-group-name)
3311 (defvar gnus-article-current)
3417 (defun org-add-hook (hook function &optional append local)
3418 "Add-hook, compatible with both Emacsen."
3420 (add-local-hook hook function append)
3421 (add-hook hook function append local)))
3477 (defvar org-mode-hook nil)
3542 (org-add-hook 'before-change-functions 'org-before-change-function nil
3545 (org-add-hook 'kill-buffer-hook 'org-check-running-clock nil 'local)
3557 ;; Emacs 21 and XEmacs make use of the hook
3558 (org-add-hook 'isearch-mode-end-hook 'org-isearch-end 'append 'local)
3630 "wl" "mhe" "rmail" "gnus" "shell" "info" "elisp"))
4034 (org-cycle-hook
4037 (copy-sequence org-cycle-hook))
4038 org-cycle-hook))
4066 (run-hook-with-args 'org-cycle-hook 'contents))
4074 (run-hook-with-args 'org-cycle-hook 'all))
4081 (run-hook-with-args 'org-cycle-hook 'overview))))
4120 (run-hook-with-args 'org-cycle-hook 'children))
4127 (run-hook-with-args 'org-cycle-hook 'subtree))
4133 (run-hook-with-args 'org-cycle-hook 'folded)))))
4210 This function is the default value of the hook `org-cycle-hook'."
4265 \[Up]/[Down]=next/prev headline TAB=cycle visibility RET=select [Q]uit")
4295 "Let the user select a location in the Org-mode buffer BUF.
4411 (select-frame (make-frame))
4417 (select-frame (or (and org-indirect-dedicated-frame
4434 (and (window-live-p cwin) (select-window cwin))))
4487 (run-hooks 'org-insert-heading-hook)))))
6990 (select-window (get-buffer-window (marker-buffer pos)))
7962 (org-add-hook 'post-command-hook 'org-table-edit-formulas-post-command t t)
7984 (select-window win)))))
8004 (select-window (get-buffer-window (marker-buffer pos)))
8021 (select-window (get-buffer-window (marker-buffer pos)))
8089 (org-add-hook 'before-change-functions
8104 (select-window (get-buffer-window (marker-buffer pos)))
8180 (select-window win))))
8221 (select-window (get-buffer-window (marker-buffer org-pos)))
8229 (select-window win)))
8274 (add-hook 'before-change-functions 'org-table-remove-rectangle-highlight))
8279 (remove-hook 'before-change-functions 'org-table-remove-rectangle-highlight)
8389 ;; Exit without error, in case some hook functions calls this
8402 (org-add-hook 'before-change-functions 'org-before-change-function
8416 (run-hooks 'orgtbl-mode-hook))
8420 (remove-hook 'before-change-functions 'org-before-change-function t)
9069 (vm-select-folder-buffer)
9135 ((eq major-mode 'gnus-group-mode)
9136 (let ((group (cond ((fboundp 'gnus-group-group-name) ; depending on Gnus
9137 (gnus-group-group-name)) ; version
9138 ((fboundp 'gnus-group-name)
9139 (gnus-group-name))
9142 (org-store-link-props :type "gnus" :group group)
9146 "gnus:")
9150 ((memq major-mode '(gnus-summary-mode gnus-article-mode))
9151 (and (eq major-mode 'gnus-article-mode) (gnus-article-show-summary))
9152 (let* ((group gnus-newsgroup-name)
9153 (article (gnus-summary-article-number))
9154 (header (gnus-summary-article-header article))
9158 (subject (gnus-summary-subject-string)))
9159 (org-store-link-props :type "gnus" :from from :subject subject
9168 (setq link (org-make-link "gnus:" group
9169 "#" (number-to-string article))))))
9181 ((setq search (run-hook-with-args-until-success
9410 Completion can be used to select a link previously stored with
9699 (org-follow-gnus-link path))
9707 ((string= type "gnus")
9708 (let (group article)
9712 article (match-string 3 path))
9713 (org-follow-gnus-link group article)))
9716 (let (folder article)
9720 article (match-string 3 path))
9722 (org-follow-vm-link folder article in-emacs)))
9725 (let (folder article)
9729 article (match-string 3 path))
9730 (org-follow-wl-link folder article)))
9733 (let (folder article)
9737 article (match-string 3 path))
9738 (org-follow-mhe-link folder article)))
9741 (let (folder article)
9745 article (match-string 3 path))
9746 (org-follow-rmail-link folder article)))
9785 A function in the hook should first test if it would like to
9794 added to the companion hook `org-execute-file-search-functions',
9797 A function in this hook may also use `setq' to set the variable
9805 Functions added to this hook must accept a single argument, the
9819 In case this is needed, a function in this hook can also restore
9838 ((run-hook-with-args-until-success 'org-execute-file-search-functions s))
9947 (select-window win))
9955 (select-window cwin))))
10062 (defun org-follow-gnus-link (&optional group article)
10064 (require 'gnus)
10065 (funcall (cdr (assq 'gnus org-link-frame-setup)))
10066 (if gnus-other-frame-object (select-frame gnus-other-frame-object))
10067 (cond ((and group article)
10068 (gnus-group-read-group 0 nil group)
10069 (gnus-summary-goto-article (string-to-number article) nil t))
10070 (group (gnus-group-jump-to-group group))))
10072 (defun org-follow-vm-link (&optional folder article readonly)
10075 (setq article (org-add-angle-brackets article))
10094 (when article
10095 (vm-select-folder-buffer)
10100 (concat "^" "message-id: *" (regexp-quote article))))
10107 (defun org-follow-wl-link (folder article)
10110 article
10111 (string-match "^\\([^#]+\\)\\(#\\(.*\\)\\)?" article))
10113 ;; Thus, we recompose folder and article ids.
10114 (setq folder (format "%s#%s" folder (match-string 1 article))
10115 article (match-string 3 article)))
10119 (and article
10120 (wl-summary-jump-to-msg-by-message-id (org-add-angle-brackets article))
10123 (defun org-follow-rmail-link (folder article)
10125 (setq article (org-add-angle-brackets article))
10136 (or article "")))
10223 (defun org-follow-mhe-link (folder article)
10234 (if (not article)
10236 (setq article (org-add-angle-brackets article))
10240 (mh-search folder (list "--message-id" article))
10244 (mh-search "+" (list "--message-id" article))))
10245 (mh-search "+" article))
10301 (add-hook 'org-create-file-search-functions 'org-create-file-search-in-bibtex)
10302 (add-hook 'org-execute-file-search-functions 'org-execute-file-search-in-bibtex)
10424 This function should be placed into `remember-mode-hook' and in fact requires
10425 to be run from that hook to fucntion properly."
10784 This function can be used in a hook."
10998 (run-hooks 'org-after-todo-state-change-hook)
11026 This function should be run in the `org-after-todo-state-change-hook'."
11037 (unless (memq 'org-add-log-note (default-value 'post-command-hook))
11178 (add-hook 'post-command-hook 'org-add-log-note 'append))))
11182 (remove-hook 'post-command-hook 'org-add-log-note)
11270 (org-add-hook 'before-change-functions 'org-remove-occur-highlights
11274 (run-hooks 'org-occur-hook)
11340 (remove-hook 'before-change-functions
11499 If optional argument TODO_ONLY is non-nil, only select lines that are
11982 While prompting, a calendar is popped up - you can also select the
12011 (calendar-move-hook nil)
12034 (define-key map (kbd "RET") 'org-calendar-select)
12036 'org-calendar-select-mouse)
12038 'org-calendar-select-mouse)
12120 (select-window (get-buffer-window "*Calendar*"))
12127 (select-window sw)))
12129 (defun org-calendar-select ()
12242 (defun org-calendar-select-mouse (ev)
12492 (calendar-move-hook nil))
12494 (select-window cwin)
12497 (select-window win))))
12505 (calendar-move-hook nil)
12659 (org-add-hook 'before-change-functions 'org-remove-clock-overlays
12701 (remove-hook 'before-change-functions
12719 (add-hook 'org-after-todo-state-change-hook
12936 (defvar org-agenda-mode-hook nil)
12957 (org-add-hook 'post-command-hook 'org-agenda-post-command-hook nil 'local)
12958 (org-add-hook 'pre-command-hook 'org-unhighlight nil 'local)
12983 (list 'org-agenda-mode-hook)))
13223 Prompts for a character to select a command. Any prefix arg will be passed
13228 T Call `org-todo-list' to display the global todo list, select only
13232 M Like `m', but select only TODO entries, no ordinary headlines.
13460 (org-add-hook 'after-save-hook
13479 (let ((org-mode-hook nil) (default-major-mode 'fundamental-mode))
13595 (awin (select-window awin))
13621 (run-hooks 'org-finalize-agenda-hook))))
14024 (defvar org-select-this-todo-keyword nil)
14030 The prefix arg can be used to select a specific TODO keyword and limit
14042 (org-select-this-todo-keyword
14048 (setq org-select-this-todo-keyword
14051 (and (equal 0 arg) (setq org-select-this-todo-keyword nil))
14071 (insert (or org-select-this-todo-keyword "ALL") "\n")
14218 (diary-display-hook '(fancy-diary-display))
14219 (list-diary-entries-hook
14220 (cons 'org-diary-default-entry list-diary-entries-hook))
14277 ;; We can rely on the hook, nothing to do
14456 (if org-select-this-todo-keyword
14457 (concat "\\<\\(" org-select-this-todo-keyword
15248 (add-hook 'pre-command-hook 'org-unhighlight-once))
15251 (remove-hook 'pre-command-hook 'org-unhighlight-once)
15304 (defun org-agenda-post-command-hook ()
15459 (select-window win)))
15467 (select-window win)))
15947 (calendar-move-hook nil)
16248 (insert "\\documentclass{article}
16629 ("crarr") ("hookleftarrow"."↵") ; has round hook, not quite CR
17182 TYPE is the final key (as a string) that also select the export command in
17732 ((member type '("bbdb" "vm" "wl" "mhe" "rmail" "gnus" "shell" "info" "elisp"))
18340 (run-hooks 'org-after-save-iCalendar-file-hook)))))
18343 (defvar org-after-save-iCalendar-file-hook nil
18345 The iCalendar buffer is still current when this hook is run.
19810 ;; Under XEmacs, the hook is run in the correct place,
19813 ;; In Emacs the hook runs *before* restoring the overlays.
19814 ;; So we have to use a one-time post-command-hook to do this.
19816 (unless (and (boundp 'isearch-mode-end-hook-quit)
19817 isearch-mode-end-hook-quit)
19819 (org-add-hook 'post-command-hook 'org-isearch-post-command
19823 "Remove self from hook, and show context."
19824 (remove-hook 'post-command-hook 'org-isearch-post-command 'local)
19831 '(if (boundp 'bookmark-after-jump-hook)
19832 ;; We can use the hook
19833 (add-hook 'bookmark-after-jump-hook 'org-bookmark-jump-unhide)
19858 (run-hooks 'org-load-hook)