Lines Matching +defs:mh +defs:find +defs:path
595 Archive in file ~/org/archive.org (absolute path), as top-level trees.
598 Archive in file ./basement (relative path), as level 3 trees
882 (defcustom org-link-file-path-type 'adaptive
883 "How the path name in file links should be stored.
888 absolute absolute path, if possible with ~ for home directory.
889 noabbrev absolute path, no abbreviation of home directory.
890 adaptive Use relative path for files in the current directory and sub-
891 directories of it. For other files, use an absolute path."
962 used to find the context when the link is activated by the command
1023 (file . find-file-other-window))
1035 `find-file'
1036 `find-file-other-window'
1037 `find-file-other-frame'
1054 (const find-file)
1055 (const find-file-other-window)
1056 (const find-file-other-frame)))))
1163 "External applications for opening `file:path' items in a document.
1180 by the path to the file.
1181 sexp A Lisp form which will be evaluated. The file path will
1201 "Non-nil means, that the search for the mh-message will be extended to
1278 vm, wl, mh, rmail | %:type %:subject %:message-id
1418 "Non-nil means, find REPEAT cookies in entries and apply them.
1597 make sure all corresponding TODO items find their way into the list."
2176 find LaTeX fragments. Valid members of this list are:
2177 \"begin\" find environments
2178 \"$\" find math expressions surrounded by $...$
2179 \"$$\" find math expressions surrounded by $$....$$
2180 \"\\(\" find math expressions surrounded by \\(...\\)
2181 \"\\ [\" find math expressions surrounded by \\ [...\\]"
2197 This path may be relative to the directory where the Org-mode file lives.
2200 `:ical', or `:xoxo' and the corresponding directories. If a direcoty path
2379 When set, the exporter will find LaTeX environments if the \\begin line is
2380 the first non-white thing on a line. It will also find the math delimiters
3314 (defvar mh-progs)
3315 (defvar mh-current-folder)
3316 (defvar mh-show-folder-buffer)
3317 (defvar mh-index-folder)
3318 (defvar mh-searcher)
3405 (defun org-find-overlays (prop &optional pos delete)
3616 (if (featurep 'xemacs) [button3] [mouse-3]) 'org-find-file-at-mouse)
3674 ; 3: path
3850 With optional argument RADIO, only find radio targets."
4276 overview mode. You can dive into the tree in that copy, to find the
5128 This will find all statistic cookies like [57%] and [6/12] and update them
5395 ;; find where this list begins
5461 (defun org-archive-subtree (&optional find-done)
5467 When called with prefix argument FIND-DONE, find whole trees without any
5473 (if find-done
5489 ;; Try to find a local archive location
5502 buffer (find-file-noselect file))
5884 (with-current-buffer (find-file-noselect file)
6470 (org-table-find-dataline)
6490 (defun org-table-find-dataline ()
6514 (org-table-find-dataline)
6551 (org-table-find-dataline)
7743 (setq i (org-find-row-type table i 'hline (equal hdir "-") nil hn)))
7745 (setq i (org-find-row-type table i 'dline (equal odir "-") rel on)))
7748 (defun org-find-row-type (table i type backwards relative n)
8739 (error "Cannot find end of insertion region"))
9107 ((or (equal major-mode 'mh-folder-mode)
9108 (equal major-mode 'mh-show-mode))
9113 (org-store-link-props :type "mh" :from from :to to
9423 selected using completion. The path to the file will be relative to
9425 subdirectory. Otherwise, the link will be the absolute path as
9426 completed in the minibuffer (i.e. normally ~/path/to/file).
9428 With two \\[universal-argument] prefixes, enforce an absolute path even if the file
9496 (let* ((path (match-string 1 link))
9500 (if (equal (file-truename buffer-file-name) (file-truename path))
9504 ;; Check if we can/should use a relative path. If yes, simplify the link
9506 (let* ((path (match-string 1 link))
9509 ((eq org-link-file-path-type 'absolute)
9510 (setq path (abbreviate-file-name (expand-file-name path))))
9511 ((eq org-link-file-path-type 'noabbrev)
9512 (setq path (expand-file-name path)))
9513 ((eq org-link-file-path-type 'relative)
9514 (setq path (file-relative-name path)))
9520 (expand-file-name path))
9521 ;; We are linking a file with relative path name.
9522 (setq path (substring (expand-file-name path)
9524 (setq link (concat "file:" path))))
9580 (defun org-find-file-at-mouse (ev)
9611 (let (type path link line search (pos (point)))
9621 (setq type (match-string 1 link) path (match-string 2 link))
9622 (setq type "thisfile" path link))
9629 path (buffer-substring
9637 (setq type (match-string 1) path (match-string 2))
9642 path (match-string 1))
9643 (while (string-match ":" path)
9644 (setq path (replace-match "+" t t path)))
9646 (unless path
9648 ;; Remove any trailing spaces in path
9649 (if (string-match " +\\'" path)
9650 (setq path (replace-match "" t t path)))
9657 (address path) (subject "") a)
9658 (if (string-match "\\(.*\\)::\\(.*\\)" path)
9659 (setq address (match-string 1 path)
9660 subject (org-link-escape (match-string 2 path))))
9673 (browse-url (concat type ":" path)))
9676 (org-tags-view in-emacs path))
9683 path
9690 (if (string-match "::\\([0-9]+\\)\\'" path)
9691 (setq line (string-to-number (match-string 1 path))
9692 path (substring path 0 (match-beginning 0)))
9693 (if (string-match "::\\(.+\\)\\'" path)
9694 (setq search (match-string 1 path)
9695 path (substring path 0 (match-beginning 0)))))
9696 (org-open-file path in-emacs line search))
9699 (org-follow-gnus-link path))
9702 (org-follow-bbdb-link path))
9705 (org-follow-info-link path))
9709 (if (not (string-match "\\`\\([^#]+\\)\\(#\\(.*\\)\\)?" path))
9711 (setq group (match-string 1 path)
9712 article (match-string 3 path))
9717 (if (not (string-match "\\`\\([^#]+\\)\\(#\\(.*\\)\\)?" path))
9719 (setq folder (match-string 1 path)
9720 article (match-string 3 path))
9726 (if (not (string-match "\\`\\([^#]+\\)\\(#\\(.*\\)\\)?" path))
9728 (setq folder (match-string 1 path)
9729 article (match-string 3 path))
9734 (if (not (string-match "\\`\\([^#]+\\)\\(#\\(.*\\)\\)?" path))
9736 (setq folder (match-string 1 path)
9737 article (match-string 3 path))
9742 (if (not (string-match "\\`\\([^#]+\\)\\(#\\(.*\\)\\)?" path))
9744 (setq folder (match-string 1 path)
9745 article (match-string 3 path))
9749 (let ((cmd path))
9764 (let ((cmd path))
9866 ;; Make a series of regular expressions to find a match
10058 (Info-find-node (match-string 1 name) (match-string 2 name))
10059 (Info-find-node (match-string 1 name) "Top")))
10101 (error "Could not find the specified message in this folder"))
10112 ;; XXX: imap-uw supports folders starting with '#' such as "#mh/inbox".
10146 ;;; mh-e integration based on planner-mode
10152 (if (equal major-mode 'mh-folder-mode)
10153 mh-current-folder
10155 mh-show-folder-buffer))
10157 (if (boundp 'mh-index-folder)
10158 (min (length mh-index-folder) (length folder))))
10160 ;; a simple test on mh-index-data does not work, because
10161 ;; mh-index-data is always nil in a show buffer.
10162 (if (and (boundp 'mh-index-folder)
10163 (string= mh-index-folder (substring folder 0 end-index)))
10164 (if (equal major-mode 'mh-show-mode)
10181 (mh-index-previous-folder)
10189 (if (equal major-mode 'mh-folder-mode)
10190 mh-current-folder
10192 mh-show-folder-buffer)))
10198 (if (equal major-mode 'mh-folder-mode)
10199 (mh-get-msg-num nil)
10201 (mh-show-buffer-message-number))))
10212 (mh-display-msg num folder)
10213 (if (equal major-mode 'mh-folder-mode)
10214 (mh-header-display)
10215 (mh-show-header-display))
10217 (setq header-field (mh-get-header-field header))
10218 (if (equal major-mode 'mh-folder-mode)
10219 (mh-show)
10220 (mh-show-show))
10226 `org-mhe-search-all-folders' is t and `mh-searcher' is pick,
10230 (require 'mh-e)
10231 (require 'mh-search)
10232 (require 'mh-utils)
10233 (mh-find-path)
10235 (mh-visit-folder (mh-normalize-folder-name folder))
10237 (mh-search-choose)
10238 (if (equal mh-searcher 'pick)
10240 (mh-search folder (list "--message-id" article))
10244 (mh-search "+" (list "--message-id" article))))
10245 (mh-search "+" article))
10247 (mh-show-msg 1)
10308 (defun org-open-file (path &optional in-emacs line search)
10320 (let* ((file (if (equal path "")
10322 (substitute-in-file-name (expand-file-name path))))
10383 (defun org-expand-file-name (path)
10384 "Replace special path abbreviations and expand the file name."
10385 (expand-file-name path))
10542 find a better place. Then press RET or <left> or <right> in insert the note.
10575 (visiting (org-find-base-buffer-visiting file))
10598 (if (not visiting) (find-file-noselect file))
10681 (defun org-find-dblock (name)
10863 (message "Can't find completion for \"%s\"" pattern)
12746 (unless (org-find-dblock "clocktable")
13458 (find-file org-agenda-files)
13476 (while (setq b (find-buffer-visiting f)) (kill-buffer b))
13494 If the current buffer visits an agenda file, find the next one in the list.
13495 If the current buffer does not, find the first agenda file."
13506 (find-file (car files))
13508 (find-file (car fs)))
13562 (vector file (list 'find-file file) t))
13710 (let ((buf (org-find-base-buffer-visiting file)))
13714 (setq buf (find-file-noselect file))
14335 &%%(org-diary) ~/path/to/some/orgfile.org
14372 FILE is the path to a file to be checked for entries. DATE is date like
15145 (org-agenda-find-today-or-agenda)))
15146 (t (error "Cannot find today")))))
15148 (defun org-agenda-find-today-or-agenda ()
15164 (org-agenda-find-today-or-agenda)))
15176 (org-agenda-find-today-or-agenda)))
15191 (org-agenda-find-today-or-agenda))
15208 (org-agenda-find-today-or-agenda))
15725 (error "Cannot find time stamp"))
15776 (error "Cannot find time stamp"))
16380 (defun org-export-find-first-heading-line (list)
16967 (lines (org-export-find-first-heading-line
16982 (buffer (find-file-noselect filename))
17002 (find-file-noselect filename)
17159 ;; find the indentation of the next non-empty line
17210 (goto-char (org-find-invisible))
17212 (setq s (goto-char (org-find-visible))))
17234 (defun org-find-visible ()
17239 (defun org-find-invisible ()
17413 (lines (org-export-find-first-heading-line all_lines))
17423 (buffer (find-file-noselect filename))
17456 rpl path desc descp desc1 desc2 link
17662 (setq path (match-string 3 line))
17664 desc2 (if (match-end 2) (concat type ":" path) path)
17679 (org-solidify-link-text path target-alist)
17685 (org-file-image-p path))
17686 (setq rpl (concat "<img src=\"" type ":" path "\"/>"))
17687 (setq link (concat type ":" path))
17691 (setq link (concat type ":" path))
17695 (let* ((filename path)
17734 (save-match-data (org-link-unescape path))
18483 (out (find-file-noselect filename))
19570 (defun org-find-base-buffer-visiting (file)
19571 "Like `find-buffer-visiting' but alway return the base buffer and
19573 (let ((buf (find-buffer-visiting file)))