Lines Matching +refs:gnus +refs:current +refs:move +refs:group
71 (require 'gnus-sum)
105 :group 'outlines
106 :group 'hypermedia
107 :group 'calendar)
112 :group 'org)
122 :group 'org-startup
132 :group 'org-startup
143 :group 'org-startup
153 :group 'org-startup
176 :group 'org-startup
201 :group 'org-startup
211 :group 'org)
219 :group 'org-keywords
228 :group 'org-keywords
233 :group 'org-keywords
238 :group 'org-keywords
246 :group 'org-keywords
255 :group 'org-keywords
260 After a match, group 1 contains the repeat expression.")
265 :group 'org)
270 :group 'org-structure)
289 :group 'org-reveal-location
317 :group 'org-reveal-location
338 been invisible before. When this is set, the sibling of the current entry
340 the same happens on each level of the hierarchy above the current entry.
348 :group 'org-reveal-location
369 :group 'org-structure)
380 :group 'org-cycle
389 If TAB is used in a place where it does not emulate TAB, the current subtree
391 :group 'org-cycle
406 :group 'org-cycle
413 :group 'org-structure)
427 :group 'org-edit-structure
428 :group 'org-font-lock
437 :group 'org-edit-structure
445 :group 'org-edit-structure
452 :group 'org-edit-structure
460 :group 'org-edit-structure
466 :group 'org-structure)
472 :group 'org-sparse-trees
481 :group 'org-sparse-trees
482 :group 'org-time
490 :group 'org-sparse-trees
496 :group 'org-structure)
505 :group 'org-plain-lists
514 :group 'org-plain-lists
524 :group 'org-plain-lists
532 :group 'org-plain-lists
538 :group 'org-structure)
544 :group 'org-archive
545 :group 'org-keywords
551 :group 'org-archive
552 :group 'org-agenda-skip
560 :group 'org-archive
561 :group 'org-cycle
568 :group 'org-archive
569 :group 'org-sparse-trees
577 file. %s will be replaced by the current file name (without directory part).
587 If the current file is Projects.org, archive in file
591 Archive in the current file, under the top-level headline
605 :group 'org-archive
610 :group 'org-archive
618 :group 'org-archive
624 :group 'org)
636 TAB or RET are pressed to move to another field. With optimization this
651 :group 'org-table
668 :group 'org-table
693 :group 'org-table
701 :group 'org-table)
705 :group 'org-table-settings
721 :group 'org-table-settings
742 :group 'org-table-settings
748 :group 'org-table)
754 :group 'org-table-editing
762 :group 'org-table-editing
767 If a horizontal separator line is following the current line,
771 :group 'org-table-editing
778 :group 'org-table-editing
784 :group 'org-table)
787 "Non-nil means, increment when copying current field with \\[org-table-copy-down]."
788 :group 'org-table-calculation
804 :group 'org-table-calculation
808 "Non-nil means, TAB and RET evaluate a formula in current table field.
809 If the current field starts with an equal sign, it is assumed to be a formula
815 :group 'org-table-calculation
826 :group 'org-table-calculation
838 :group 'org-table-calculation
846 :group 'org-table-calculation
852 :group 'org)
871 :group 'org-link
879 :group 'org-link
886 relative relative to the current directory, i.e. the directory of the file
890 adaptive Use relative path for files in the current directory and sub-
892 :group 'org-link
914 :group 'org-link
925 :group 'org-link)
944 :group 'org-link-store
956 :group 'org-link-store
966 :group 'org-link-store
972 The command `org-store-link' adds a link pointing to the current
979 :group 'org-link-store
987 :group 'org-link-store
993 :group 'org-link)
998 :group 'org-link-follow
1004 :group 'org-link-follow
1011 :group 'org-link-follow
1017 :group 'org-link-follow
1022 (gnus . gnus-other-frame)
1032 `gnus'
1033 `gnus-other-frame'
1041 :group 'org-link-follow
1048 (cons (const gnus)
1050 (const gnus)
1051 (const gnus-other-frame)))
1064 an indirect buffer clone of the current buffer, to avoid any visibility
1065 changes to the current buffer."
1066 :group 'org-link-follow
1072 :group 'org-link-follow
1081 :group 'org-link-follow
1099 :group 'org-link-follow
1116 :group 'org-link-follow
1177 `emacs' The file will be visited by the current Emacs process.
1187 :group 'org-link-follow
1205 :group 'org-link-follow
1211 :group 'org)
1217 :group 'org-remember
1226 :group 'org-remember
1236 :group 'org-remember
1270 link type that is created. For example, calling `remember' in emails or gnus
1282 gnus | %:group, for messages also all email fields
1286 :group 'org-remember
1304 :group 'org-remember
1314 :group 'org)
1319 :group 'org-time)
1331 :group 'org-todo
1332 :group 'org-keywords
1345 :group 'org-todo
1346 :group 'org-keywords
1354 :group 'org-todo
1386 :group 'org-todo
1387 :group 'org-progress
1408 :group 'org-todo
1409 :group 'org-progress
1422 :group 'org-todo
1423 :group 'org-progress
1429 :group 'org-todo)
1434 :group 'org-priorities
1439 :group 'org-priorities
1445 :group 'org)
1452 :group 'org-time
1465 :group 'org-time
1473 :group 'org-time
1483 :group 'org-time
1497 :group 'org-time
1505 :group 'org-time
1512 :group 'org-time
1518 :group 'org)
1527 :group 'org-tags
1532 (const :tag "Start radio group" (:startgroup))
1533 (const :tag "End radio group" (:endgroup)))))
1544 :group 'org-tags
1556 :group 'org-tags
1567 :group 'org-tags
1575 :group 'org-tags
1583 :group 'org-tags
1598 :group 'org-tags
1609 :group 'org)
1633 :group 'org-agenda
1643 :group 'org-agenda
1654 :group 'org-agenda
1660 :group 'org-agenda)
1674 todo-tree Sparse tree of specific TODO keyword in *current* file.
1675 tags-tree Sparse tree with all tags matches in *current* file.
1676 occur-tree Occur sparse tree for *current* file.
1705 :group 'org-agenda-custom-commands
1714 (const :tag "Tags sparse tree (current buffer)" tags-tree)
1715 (const :tag "TODO keyword tree (current buffer)" todo-tree)
1716 (const :tag "Occur tree (current buffer)" occur-tree)
1776 :group 'org-agenda-custom-commands
1786 :group 'org-agenda)
1792 :group 'org-agenda-skip
1793 :group 'org-todo
1800 :group 'org-agenda-skip
1801 :group 'org-todo
1808 :group 'org-agenda-skip
1809 :group 'org-todo
1815 :group 'org-agenda-skip
1824 :group 'org-agenda-skip
1834 :group 'org-agenda)
1838 :group 'org-agenda-startup
1845 :group 'org-agenda-startup
1850 :group 'org-agenda-startup
1856 :group 'org-agenda)
1862 current-window Show agenda in the current window, keeping all other windows.
1865 reorganize-frame Show only two windows on the current frame, the current
1868 :group 'org-agenda-windows
1870 (const current-window)
1878 the current status is recorded. When the agenda is exited with
1882 :group 'org-agenda-windows
1890 current-window Display in the current window
1894 :group 'org-structure
1895 :group 'org-agenda-windows
1897 (const :tag "In current window" current-window)
1898 (const :tag "In current frame, other window" other-window)
1905 :group 'org-agenda)
1910 :group 'org-agenda-daily/weekly
1916 When nil, always start on the current day."
1917 :group 'org-agenda-daily/weekly
1924 :group 'org-agenda-daily/weekly
1932 :group 'org-agenda-daily/weekly
1937 :group 'org-agenda-daily/weekly
1944 :group 'org-agenda-daily/weekly
1950 :group 'org-agenda)
1959 :group 'org-agenda-time-grid
1973 today show grid on current date, independent of daily/weekly display
1980 :group 'org-agenda-time-grid
1997 :group 'org-agenda)
2030 in order to make a time schedule for the current day the first thing in the
2038 :group 'org-agenda-sorting
2056 :group 'org-agenda-sorting
2062 :group 'org-agenda)
2089 current entry. This is useful for fields which should have fixed
2124 :group 'org-agenda-prefix)
2141 :group 'org-agenda-prefix
2151 :group 'org-agenda-prefix
2159 :group 'org-agenda-prefix
2165 :group 'org)
2182 :group 'org-latex
2188 :group 'org)
2193 :group 'org-export)
2203 :group 'org-export-general
2226 :group 'org-export-general
2237 :group 'org-export-general
2247 :group 'org-export-general
2254 :group 'org-export-general
2273 :group 'org-export-general
2281 :group 'org-export-general
2290 :group 'org-export-general
2299 :group 'org-export-general
2300 :group 'org-archive
2308 :group 'org-export-general
2313 :group 'org-export-general
2320 :group 'org-export-general
2329 :group 'org-export)
2339 :group 'org-export-translation
2361 :group 'org-export-translation
2373 :group 'org-export-translation
2374 :group 'org-latex
2385 :group 'org-export-translation
2386 :group 'org-latex
2400 :group 'org-export-translation
2406 :group 'org-export-translation
2412 :group 'org-export)
2425 :group 'org-export-tables
2434 :group 'org-export-tables
2443 :group 'org-export-tables
2454 :group 'org-export-tables
2460 :group 'org-export)
2465 :group 'org-export-ascii
2475 :group 'org-export-ascii
2481 :group 'org-export)
2486 :group 'org-export)
2534 :group 'org-export-html
2539 :group 'org-export-html
2544 :group 'org-export-html
2556 :group 'org-export-html
2565 :group 'org-export-html
2577 :group 'org-export-html
2585 :group 'org-export-html
2592 :group 'org-export-html
2598 :group 'org-export-html
2604 :group 'org-export)
2610 :group 'org-export-icalendar
2615 :group 'org-export-icalendar
2623 :group 'org-export-icalendar
2629 :group 'org)
2636 :group 'org-font-lock
2652 :group 'org-font-lock
2660 :group 'org-font-lock
2666 :group 'org-font-lock
2732 :group 'org-font-lock
2755 :group 'org-font-lock
2771 :group 'org-font-lock)
2776 For them we convert a (min-colors 8) entry to a `tty' entry and move it
2800 :group 'org-faces)
2811 :group 'org-faces)
2821 :group 'org-faces)
2833 :group 'org-faces)
2845 :group 'org-faces)
2853 :group 'org-faces)
2861 :group 'org-faces)
2869 :group 'org-faces)
2877 :group 'org-faces)
2885 :group 'org-faces)
2895 :group 'org-faces)
2904 :group 'org-faces)
2917 :group 'org-faces)
2924 :group 'org-faces)
2931 :group 'org-faces)
2936 :group 'org-faces)
2946 :group 'org-faces)
2955 :group 'org-faces)
2966 :group 'org-faces)
2976 :group 'org-faces)
2985 :group 'org-faces)
2995 :group 'org-faces)
3005 :group 'org-faces)
3013 :group 'org-faces)
3034 "Matches a headline and puts TODO state into group 2 if present.")
3037 "Matches a headline and puts TODO state into group 2 if present.
3038 Also put tags into group 4 if tags are present.")
3106 "Make VAR local in current buffer and set it to VALUE."
3110 "Check if the current buffer is in Org-mode."
3150 "Precompute regular expressions for current buffer."
3309 (defvar gnus-other-frame-object)
3310 (defvar gnus-group-name)
3311 (defvar gnus-article-current)
3312 (defvar w3m-current-url)
3313 (defvar w3m-current-title)
3315 (defvar mh-current-folder)
3320 (defvar Info-current-file)
3321 (defvar Info-current-node)
3364 (defun org-move-overlay (ovl beg end &optional buffer)
3366 (set-extent-endpoints ovl beg end (or buffer (current-buffer)))
3367 (move-overlay ovl beg end buffer)))
3522 (org-set-local 'line-move-ignore-invisible t))
3583 (let ((current-prefix-arg arg)) (call-interactively command)))
3585 (defsubst org-current-line (&optional pos)
3590 (defun org-current-time ()
3598 (current-time)))
3630 "wl" "mhe" "rmail" "gnus" "shell" "info" "elisp"))
4013 From this state, you can move to one of the children
4048 ;; Enter the table or move to the next field in the table
4211 (when (get-buffer-window (current-buffer))
4221 "Is the end of the current subtree visible?"
4268 "Go to a different location of the document, keeping current visibility.
4275 This command works around this by showing a copy of the current buffer in
4283 (org-get-location (current-buffer) org-goto-help)))
4326 (let ((gm (current-global-map))
4340 current-prefix-arg arg)
4350 current-prefix-arg (- (match-end 0) (match-beginning 0)))
4362 current-prefix-arg (- (match-end 0) (match-beginning 0)))
4379 "Create indirect buffer and narrow it to current subtree.
4389 (let ((cbuf (current-buffer))
4424 ((eq org-indirect-buffer-display 'current-window)
4437 (setq buffer (or buffer (current-buffer)))
4447 "Set the title of the current frame to the string TITLE."
4460 current headline. If point is in the middle of a headline, split the headline
4462 the current headline."
4491 "Insert a new heading with the same level and TODO state as current heading.
4527 "Promote the current heading higher up the tree.
4538 "Demote the current heading lower down the tree.
4561 LEVEL is a current level, CHANGE is by how much the level should be
4571 "Promote the current heading higher up the tree.
4585 "Demote the current heading lower down the tree.
4598 "Call FUN for every heading underneath the current one."
4625 "Change the indentation in the current entry by DIFF
4626 However, if any line in the current entry has no indentation, or if it
4638 (setq col (current-column))
4641 (move-marker end nil))))
4686 (defun org-move-subtree-up (&optional arg)
4687 "Move the current subtree up past ARG headlines of the same level."
4689 (org-move-subtree-down (- (prefix-numeric-value arg))))
4691 (defun org-move-subtree-down (&optional arg)
4692 "Move the current subtree down past ARG headlines of the same level."
4714 (error "Cannot move past superior level or buffer limit")))
4717 ;; Moving forward - still need to move over subtree
4723 (move-marker ins-point (point))
4729 (move-marker ins-point nil)))
4741 "Cut the current subtree into the clipboard.
4747 "Cut the current subtree into the clipboard.
4764 (setq org-subtree-clip (current-kill 0))
4791 (let* ((txt (or tree (and kill-ring (current-kill 0))))
4859 (eq org-subtree-clip (current-kill 0))
4865 "Check if the current kill is an outline subtree, or a set of trees.
4870 If optional TXT is given, check this string instead of the current kill."
4871 (let* ((kill (or txt (and kill-ring (current-kill 0)) ""))
4886 "Narrow buffer to the current subtree."
4932 ;; we will sort the children of the current headline
5052 "Insert a new item at the current level.
5095 "Toggle the checkbox in the current line."
5127 "Update the checkbox statistics in the current section.
5129 with the current numbers. With optional prefix argument ALL, do this for
5135 (end (move-marker (make-marker)
5168 (if all "in entire file" "in current outline entry") cstat)))))
5182 "Get the indentation of the current line, interpreting tabs.
5190 (current-column))))
5207 If the current indenation in LINE is smaller than the minimum,
5218 "Go to the beginning of the current hand-formatted item.
5229 (setq ind (current-column))
5236 (setq ind1 (current-column))
5244 "Go to the end of the current hand-formatted item.
5252 (current-column)))
5260 (setq ind1 (current-column))
5267 "Move to the beginning of the next item in the current plain list.
5280 "Move to the beginning of the previous item in the current plain list.
5300 (defun org-move-item-down ()
5323 (error "Cannot move this item further down"))))
5325 (defun org-move-item-up (arg)
5347 (error "Cannot move this item further up")))
5359 (error "Cannot move this item further up"))))
5389 (let ((line (org-current-line))
5390 (col (current-column))
5401 (skip-chars-forward " \t") (setq ind1 (current-column))
5413 (skip-chars-forward " \t") (setq ind1 (current-column))
5423 (move-to-column col)))
5444 (setq beg (move-marker org-last-indent-begin-marker (point)))
5446 (setq end (move-marker org-last-indent-end-marker (point))))
5448 (skip-chars-forward " \t") (setq ind (current-column))
5452 (skip-chars-forward " \t") (setq ind1 (current-column))
5462 "Move the current subtree to the archive.
5463 The archive can be a certain top-level heading in the current file, or in
5465 heading be marked DONE, and the current time will be added.
5484 (this-buffer (current-buffer))
5503 (setq buffer (current-buffer)))
5568 (org-insert-time-stamp (org-current-time) t t "(" ")"))
5581 "Archive sublevels of the current tree without open TODO items.
5584 When TAG is non-nil, don't move trees, but mark them with the ARCHIVE tag."
5599 (move-marker begm (point))
5600 (move-marker endm (org-end-of-subtree t)))
5602 (move-marker begm (point-min))
5603 (move-marker endm (point-max)))
5654 "Toggle the tag TAG for the current line.
5657 (let (res current)
5663 (setq current (match-string 1))
5665 (setq current ""))
5666 (setq current (nreverse (org-split-string current ":")))
5670 (or (member tag current) (push tag current)))
5672 (or (not (member tag current)) (setq current (delete tag current))))
5673 (t (if (member tag current)
5674 (setq current (delete tag current))
5676 (push tag current))))
5678 (when current
5679 (insert " :" (mapconcat 'identity (nreverse current) ":") ":"))
5684 "Toggle the archive tag for the current headline.
5685 With prefix ARG, check all children of current headline and offer tagging
5742 "Regular expression matching the current column names.")
5748 (defvar org-table-current-line-types nil
5750 (defvar org-table-current-begin-line nil
5753 "Vector of data line line numbers in the current table.")
5755 "Vector of hline line numbers in the current table.")
5804 (indent (make-string (current-column) ?\ ))
5838 (setq beg (move-marker (make-marker) (point)))
5841 (setq end (move-marker (make-marker) (point)))
5884 (with-current-buffer (find-file-noselect file)
5885 (setq buf (current-buffer))
5936 (linepos (org-current-line))
5937 (colpos (org-table-current-column))
5939 (winstartline (org-current-line (min winstart (1- (point-max)))))
6071 (move-marker end nil)
6072 (move-marker org-table-aligned-begin-marker (point))
6074 (move-marker org-table-aligned-end-marker (point))
6078 ;; Try to move to the old location
6136 "Justify the current field, text to left, number to right.
6137 Optional argument NEW may specify text to replace the current field content."
6143 (current-buffer)))
6148 (t ;; realign the current field, based on previous full realign
6150 (col (org-table-current-column))
6175 "Go to the next field in the current table, creating new lines as needed.
6222 "Go to the next row (same column) in the current table.
6233 (let ((col (org-table-current-column)))
6245 "Copy a field down in the current column.
6248 If the current field is not empty, it is copied down to the next row, and
6254 (let* ((colpos (org-table-current-column))
6289 This actually throws an error, so it aborts the current command."
6291 (= (org-table-current-column) 0)
6300 "Blank the current table field or active region."
6317 "Return the value of the field in column N of current row.
6318 N defaults to current field.
6335 "Show info about the current field, and highlight any reference at point."
6340 (col (org-table-current-column))
6342 (name (car (rassoc (list (org-current-line) col)
6345 (dline (org-table-current-dline))
6364 (defun org-table-current-column ()
6377 (defun org-table-current-dline ()
6392 "Move the cursor to the Nth column in the current table line.
6432 "If there is a table.el table nearby, recognize it and move into it."
6471 (let* ((col (max 1 (org-table-current-column)))
6475 (linepos (org-current-line))
6484 (move-marker end nil)
6491 "Find a dataline in the current table, which is needed for column commands."
6495 (let ((col (current-column))
6497 (move-to-column col)
6499 (or (not (= (current-column) col))
6502 (move-to-column col))
6516 (let* ((col (org-table-current-column))
6520 (linepos (org-current-line))
6530 (move-marker end nil)
6537 (defun org-table-move-column-right ()
6540 (org-table-move-column nil))
6541 (defun org-table-move-column-left ()
6544 (org-table-move-column 'left))
6546 (defun org-table-move-column (&optional left)
6547 "Move the current column to the right. With arg LEFT, move to the left."
6553 (let* ((col (org-table-current-column))
6558 (linepos (org-current-line))
6561 (error "Cannot move column further left"))
6563 (error "Cannot move column further right"))
6572 (move-marker end nil)
6580 (defun org-table-move-row-down ()
6583 (org-table-move-row nil))
6584 (defun org-table-move-row-up ()
6587 (org-table-move-row 'up))
6589 (defun org-table-move-row (&optional up)
6590 "Move the current table line down. With arg UP, move it up."
6592 (let* ((col (current-column))
6596 (dline1 (org-table-current-dline))
6603 (error "Cannot move row further"))
6613 (move-to-column col)
6620 "Insert a new row above the current line into the table.
6621 With prefix ARG, insert below the current line."
6636 (org-table-fix-formulas "@" nil (1- (org-table-current-dline)) 1)))
6639 "Insert a horizontal-line below the current line into the table.
6640 With prefix ARG, insert above the current line."
6646 (col (current-column)))
6655 (move-to-column col)
6672 "Delete the current row or horizontal line from the table."
6676 (let ((col (current-column))
6677 (dline (org-table-current-dline)))
6680 (move-to-column col)
6707 (let* ((thisline (org-current-line))
6708 (thiscol (org-table-current-column))
6722 (setq column (org-table-current-column)
6726 (setq column (org-table-current-column)
6739 (setq beg (move-marker (make-marker) beg)
6740 end (move-marker (make-marker) end))
6745 (setq bcol (current-column))
6748 (setq ecol (1- (current-column)))
6754 (move-marker beg nil)
6755 (move-marker end nil)
6776 (setq l01 (org-current-line)
6777 c01 (org-table-current-column))
6780 (setq l02 (org-current-line)
6781 c02 (org-table-current-column))
6802 The upper right corner ends up in the current field. All involved fields
6811 (line (org-current-line))
6812 (col (org-table-current-column))
6843 (let ((beg (move-marker (make-marker) (org-table-begin t)))
6844 (end (move-marker (make-marker) (org-table-end t))))
6852 (let ((beg (move-marker (make-marker) (org-table-begin)))
6853 (end (move-marker (make-marker) (org-table-end))))
6866 (setq end (move-marker end (org-table-end)))
6886 the current number of lines by that amount. The wrapped text is pasted back
6891 If there is no region, the current field is split at the cursor position and
6895 If there is no region, but you specify a prefix ARG, the current field gets
6902 (cline (save-excursion (goto-char beg) (org-current-line)))
6903 (ccol (save-excursion (goto-char beg) (org-table-current-column)))
6919 ;; No region, split the current field at point
6923 (col (org-table-current-column)))
6955 (let ((pos (move-marker (make-marker) (point)))
6957 (cw (current-window-configuration))
6981 (cb (current-buffer))
6992 (move-marker pos nil)
7085 "Sum numbers in region of current table column.
7107 (setq col (org-table-current-column))
7162 (defun org-table-current-field-formula ()
7163 "Return the formula active for the current field.
7165 (let* ((name (car (rassoc (list (org-current-line)
7166 (org-table-current-column))
7168 (col (org-table-current-column))
7170 (ref (format "@%d$%d" (org-table-current-dline) col))
7182 (name (car (rassoc (list (org-current-line)
7183 (org-table-current-column))
7185 (ref (format "@%d$%d" (org-table-current-dline)
7186 (org-table-current-column)))
7190 (int-to-string (org-table-current-column))))
7227 "Store the list of formulas below the current table."
7246 "Return an alist with the stored formulas directly after current table."
7299 org-table-current-begin-line nil
7300 org-table-current-line-types nil)
7325 (setq line (org-current-line) col 1)
7336 (setq org-table-current-begin-line (org-current-line)
7337 l org-table-current-begin-line)
7343 (setq org-table-current-line-types (apply 'vector (nreverse types))
7348 ;; Get the current word
7355 "Check if the current field starts with \"=\" or \":=\".
7396 (l (org-current-line))
7397 (l1 (if (org-region-active-p) (org-current-line (region-beginning))))
7398 (l2 (if (org-region-active-p) (org-current-line (region-end))))
7403 (col (org-table-current-column))
7435 (while (progn (beginning-of-line 2) (not (= (org-current-line) l2)))
7444 "Recompute the current line if marked for it, and if we haven't just done it."
7448 (equal org-last-recalc-line (org-current-line))))
7480 In a table, this command replaces the value in the current field with the
7481 result of a formula. It also installs the formula as the \"current\" column
7483 with a `C-u' prefix, the current field must ba a named field, and the
7487 for the field back into the current field, so that it can be
7513 (let ((eq (org-table-current-field-formula)))
7514 (or eq (error "No equation active for current field"))
7526 (n0 (org-table-current-column))
7655 the current column, to avoid unnecessary parsing.
7661 (or col (setq col (org-table-current-column)))
7662 (let ((thisline (org-current-line))
7719 (setq cline (or cline (org-current-line))
7720 bline (or bline org-table-current-begin-line)
7721 table (or table org-table-current-line-types))
7794 "Recalculate the current table line by applying all stored formulas.
7807 (thisline (org-current-line))
7808 (thiscol (org-table-current-column))
7824 (setq end (move-marker (make-marker) (1+ (org-table-end))))
7836 end (move-marker (make-marker) (1+ (point-at-eol)))))
7844 (setq org-last-recalc-line (org-current-line))
7945 "Edit the formulas of the current table in a separate buffer."
7950 (pos (move-marker (make-marker) (point)))
7951 (wc (current-window-configuration))
8009 (move-marker pos nil)
8023 (move-marker pos nil)
8041 (setq ind (make-string (current-column) ?\ ))
8122 (move-marker pos (point))
8188 (p1 (save-excursion (re-search-forward re nil 'move)))
8189 (p2 (save-excursion (re-search-backward re nil 'move))))
8199 (org-table-edit-move 'previous-line))
8204 (org-table-edit-move 'next-line))
8209 (org-table-edit-move 'org-table-previous-field))
8214 (org-table-edit-move 'org-table-next-field))
8216 (defun org-table-edit-move (command)
8228 (move-marker pos (point))
8257 (setq l1 (org-current-line)
8258 c1 (org-table-current-column))
8260 (setq l2 (org-current-line)
8261 c2 (org-table-current-column))
8481 '([(meta left)] org-table-move-column-left)
8482 '([(meta right)] org-table-move-column-right)
8486 '([(meta up)] org-table-move-row-up)
8487 '([(meta down)] org-table-move-row-down)
8591 ["Which Column?" org-table-current-column :active (org-at-table-p) :keys "C-c ?"]
8797 If the value is a protperty list, get the element for the current column.
9027 "\\<org-mode-map>Store an org-link to the current location.
9039 (let ((name (bbdb-record-name (bbdb-current-record)))
9040 (company (bbdb-record-company (bbdb-current-record))))
9047 (file-name-nondirectory Info-current-file)
9048 ":" Info-current-node))
9049 (setq cpltxt (concat (file-name-nondirectory Info-current-file)
9050 ":" Info-current-node))
9051 (org-store-link-props :type "info" :file Info-current-file
9052 :node Info-current-node))
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))
9141 (unless group (error "Not on a group"))
9142 (org-store-link-props :type "gnus" :group group)
9145 "http://groups.google.com/groups?group="
9146 "gnus:")
9147 group)
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
9160 :message-id message-id :group group)
9168 (setq link (org-make-link "gnus:" group
9177 (setq cpltxt (or w3m-current-title w3m-current-url)
9178 link (org-make-link w3m-current-url))
9194 ;; link to the file in the current line
9202 ;; Just link to current headline
9302 "Make search string for STRING or current headline."
9374 "Find a header field in the current buffer."
9424 the current directory if the file is in the current directory or a
9429 is in the current directory or below.
9492 ;; Check if we are linking to the current file with a search option
9602 the end of the current subtree.
9606 (move-marker org-open-link-marker (point))
9607 (setq org-window-config-before-follow-link (current-window-configuration))
9680 (org-get-buffer-for-internal-link (current-buffer)))
9699 (org-follow-gnus-link path))
9707 ((string= type "gnus")
9708 (let (group article)
9711 (setq group (match-string 1 path)
9713 (org-follow-gnus-link group article)))
9775 (move-marker org-open-link-marker nil))
9814 Each function can access the current prefix argument through the
9815 variable `current-prefix-argument'. Note that a single prefix is
9829 If the current buffer is in `dired-mode', grep will be used to search
9905 (defun org-search-not-self (group &rest args)
9911 (goto-char (match-end group))
9912 (if (and (or (not (eq (marker-buffer m) (current-buffer)))
9935 (with-current-buffer ib (org-overview))
9971 "Put the current position or POS into the mark ring and rotate it."
9975 (move-marker (car org-mark-ring)
9977 (or buffer (current-buffer)))
9986 Org-mode commands jumping to a different position in the current file,
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))))
10148 "Return the name of the current message real folder, so if you use
10153 mh-current-folder
10186 "Return the name of the current message folder. Be careful if you
10190 mh-current-folder
10195 "Return the number of the current message. Be careful if you
10211 (with-current-buffer buffer
10289 (if (and (match-beginning 0) (equal current-prefix-arg '(16)))
10291 (let ((b (current-buffer)) (p (point)))
10327 (old-buffer (current-buffer))
10370 (or (not (equal old-buffer (current-buffer)))
10408 "Return a link to the current location as an annotation for remember.el.
10418 RET on headline -> Store as sublevel entry to current headline
10419 <left>/<right> -> before/after current headline, same headings level")
10444 (v-t (format-time-string (car org-time-stamp-formats) (org-current-time)))
10445 (v-T (format-time-string (cdr org-time-stamp-formats) (org-current-time)))
10550 <left> on headline as same level, before current heading
10551 <right> on headline as same level, after current heading
10554 the default file. This way your current train of thought is not
10560 is constructed from the current date and some additional data.
10572 (fastp current-prefix-arg)
10590 first (concat "* " (current-time-string)
10599 (with-current-buffer (or visiting (get-file-buffer file))
10620 (org-get-location (current-buffer) org-remember-help)))
10639 ((and (org-on-heading-p nil) (not current-prefix-arg))
10652 (org-paste-subtree current-prefix-arg txt)))
10655 (if (not visiting) (kill-buffer (current-buffer)))))))))
10666 "Check if the current file should receive notes in reversed order."
10683 If not found, stay at current position and return nil."
10731 "Apply COMMAND to all dynamic blocks in the current buffer.
10795 If the current word is preceded by a backslash, completes the TeX symbols
10797 If the current word is preceded by \"#+\", completes special words for
10829 (org-split-string (org-get-current-options) "\n")))
10993 (org-add-planning-info 'closed (org-current-time)
11023 "Check if the current headline contains a REPEAT key.
11113 (setq col (current-column))
11175 (move-marker org-log-note-marker (point))
11183 (setq org-log-note-window-configuration (current-window-configuration))
11185 (move-marker org-log-note-return-to (point))
11204 (kill-buffer (current-buffer))
11218 (current-time)))
11228 (move-marker org-log-note-marker nil)
11236 (with-current-buffer (marker-buffer org-log-note-return-to)
11238 (move-marker org-log-note-return-to nil)
11311 "Show current entry, hierarchy above it, and the following headline.
11334 from the `before-change-functions' in the current buffer."
11351 "Increase the priority of the current item."
11356 "Decrease the priority of the current item."
11365 (let (current new news have remove)
11369 (setq current (string-to-char (match-string 2))
11371 (setq current org-default-priority))
11381 (setq new (1- current)))
11383 (setq new (1+ current)))
11402 (message "Priority of current item set to %s" news))))
11460 ;; compile tags for current headline
11603 "Set the tags for the current headline.
11604 With prefix ARG, realign all tags in headings in the current buffer."
11607 (current (org-get-tags))
11608 table current-tags inherited-tags ; computed below when needed
11619 (setq tags current)
11624 current-tags (org-split-string current ":")
11626 (nthcdr (length current-tags)
11632 (org-fast-tag-selection current-tags inherited-tags table)
11636 nil nil current 'org-tags-history))))))
11648 (concat "\\([ \t]*" (regexp-quote current) "\\)[ \t]*$")
11654 (setq c0 (current-column) p0 (point)
11703 (move-to-column (- (window-width) 19) t)
11706 (defun org-set-current-tags-overlay (current prefix)
11707 (let ((s (concat ":" (mapconcat 'identity current ":") ":")))
11714 (defun org-fast-tag-selection (current inherited table)
11716 CURRENT is the current list of tags in the headline, INHERITED is the
11720 Returns the new tags string, or nil to not change the current settings."
11725 (buf (current-buffer))
11748 (if (> (current-column) org-tags-column)
11750 (make-string (- org-tags-column (current-column)) ?\ ))))))
11751 (org-move-overlay org-tags-overlay ov-start ov-end)
11760 (org-fast-tag-insert "Current" current c-face "\n\n")
11762 (org-set-current-tags-overlay current ov-prefix)
11791 ((member tg current) c-face)
11835 (setq current nil)
11842 (with-current-buffer buf
11847 (if (member tg current)
11848 (setq current (delete tg current))
11849 (push tg current)))
11852 (if (member tg current)
11853 (setq current (delete tg current))
11857 (setq current (delete x current)))
11859 (push tg current))
11863 (setq current
11864 (sort current
11871 (org-fast-tag-insert "Current" current c-face)
11872 (org-set-current-tags-overlay current ov-prefix)
11878 ((member tg current) c-face)
11884 (mapconcat 'identity current ":")
11888 "Get the TAGS string in the current headline."
11918 specified by the user will be filled in from the current date/time.
11920 will represent the current date/time. If there is already a timestamp
11967 Unrecognized parts of the date will default to the current day, month, year,
11998 (ct (org-current-time))
12011 (calendar-move-hook nil)
12029 (calendar-current-date))))
12031 (let* ((old-map (current-local-map))
12117 "Eval FORM in the calendar window and return to current window.
12126 (org-move-overlay org-date-ovl (1- (point)) (1+ (point)) (current-buffer))
12234 (time-to-days (current-time))))
12237 "Is the time in TIMESTAMP-STRING close to the current date?"
12290 (error "Not at a time-stamp range, and none found in current line")))
12492 (calendar-move-hook nil))
12500 "Go to the Emacs calendar at the current date.
12501 If there is a time stamp in the current line, go to that date.
12502 A prefix ARG can be used to force the current date."
12505 (calendar-move-hook nil)
12512 (let ((d1 (time-to-days (current-time)))
12532 "Start the clock on the current item.
12542 ;; First line hast scheduling info, move one further
12548 (setq ts (org-insert-time-stamp (current-time) 'with-hm 'inactive))
12549 (move-marker org-clock-marker (point) (buffer-base-buffer))
12570 (setq te (org-insert-time-stamp (current-time) 'with-hm 'inactive))
12578 (move-marker org-clock-marker nil)
12667 "Put an overlays on the current line, displaying TIME.
12675 (move-to-column c)
12680 (make-string (+ off (max 0 (- c (current-column)))) ?.)
12695 from the `before-change-functions' in the current buffer."
12704 (defun org-clock-out-if-current ()
12705 "Clock out if the current entry contains the running clock.
12708 (equal (marker-buffer org-clock-marker) (current-buffer))
12720 'org-clock-out-if-current)
12723 "Check if the current buffer contains the running clock.
12725 (when (and (equal (marker-buffer org-clock-marker) (current-buffer))
12785 The range is determined relative to TIME. TIME defaults to the current time.
12787 returned by `current time' or `encode-time'. if AS-STRINGS is non-nil,
12789 (let* ((tm (decode-time (or time (current-time))))
12841 (move-marker ins (point))
13139 "Buffers that have already seen `undo-start' in the current undo sequence.")
13152 `(let ((_cline (org-current-line))
13154 (_buf1 (current-buffer))
13157 (_undo2 (with-current-buffer ,_buffer buffer-undo-list))
13162 _undo1 (with-current-buffer _buf1 buffer-undo-list))
13164 _undo2 (with-current-buffer _buf2 buffer-undo-list)))
13167 (and _c1 (with-current-buffer _buf1 (undo-boundary)))
13168 (and _c2 (with-current-buffer _buf2 (undo-boundary)))
13192 (with-current-buffer buf
13226 a Call `org-agenda-list' to display the agenda for current day or week.
13233 l Create a timeeline for the current buffer.
13239 If the current buffer is in Org-mode and visiting a file, you can also
13241 next use of \\[org-agenda]) restricted to the current file."
13244 (let* ((buf (current-buffer))
13252 (move-marker org-agenda-restrict-begin nil)
13253 (move-marker org-agenda-restrict-end nil)
13255 (setq org-agenda-last-dispatch-buffer (current-buffer))
13264 a Agenda for current week or day
13267 L Timeline for current buffer # List stuck projects (!=configure)
13295 (org-add-props "1 Restrict call to current buffer 0 Restrict call to region or subtree" nil 'face 'org-table)))
13305 (error "Cannot restrict agenda to current buffer"))
13306 (with-current-buffer " *Agenda Commands*"
13312 (with-current-buffer buf
13315 (move-marker org-agenda-restrict-begin (region-beginning))
13316 (move-marker org-agenda-restrict-end (region-end)))
13319 (move-marker org-agenda-restrict-begin (point))
13320 (move-marker org-agenda-restrict-end
13324 (if restrict-ok " (restricted to current file)" ""))
13337 (org-let lprops '(org-tags-view current-prefix-arg match)))
13344 (org-let lprops '(org-tags-sparse-tree current-prefix-arg match)))
13390 '(org-tags-view current-prefix-arg match)))
13425 "Make sure current buffer is in org-mode. Error if not."
13457 (let ((cw (current-window-configuration)))
13464 (kill-buffer (current-buffer))))
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."
13512 "Move/add the current file to the end of the agenda file list.
13519 "Move/add the current file to the top of the agenda file list.
13521 present, it is moved there. With optional argument TO-END, add/move to the
13541 "Remove current file from the list of files in variable `org-agenda-files'.
13543 Optional argument FILE means, use this file instead of the current."
13594 ((equal (current-buffer) abuf) nil)
13596 ((not (setq org-pre-agenda-window-conf (current-window-configuration))))
13597 ((equal org-agenda-window-setup 'current-window)
13654 If this function return nil, the current match should not be skipped.
13683 (defvar org-agenda-last-marker-time (time-to-seconds (current-time))
13691 (setq org-agenda-last-marker-time (time-to-seconds (current-time)))
13698 (> (- (time-to-seconds (current-time))
13702 (move-marker (pop org-agenda-markers) nil))))
13728 (with-current-buffer buf (save-buffer)))
13733 "Get the table of categories and positions in current buffer."
13762 "Show a time-sorted view of the entries in the current org file.
13765 under the current date.
13776 (date (calendar-current-date))
13782 (today (time-to-days (current-time)))
13788 (list 'switch-to-buffer-other-window (current-buffer))
13850 (setq dates (list (time-to-days (current-time)))))
13892 The view will be for the current week, but from the overview buffer you
13895 also be shown, under the current date.
13917 (today (time-to-days (current-time)))
14038 (let* ((today (time-to-days (current-time)))
14056 '(org-todo-list (or current-prefix-arg org-last-arg)))
14110 (list 'if 'current-prefix-arg nil match)))
14124 (with-current-buffer buffer
14168 "Checks if the current subtree contains match for `org-agenda-skip-regexp'.
14206 (with-current-buffer org-agenda-buffer-name
14209 (or current-prefix-arg org-last-arg))))))
14230 (with-current-buffer fancy-diary-buffer
14373 the one returned by `calendar-current-date'. ARGS are symbols indicating
14386 (with-current-buffer buffer
14401 (equal date (calendar-current-date)))
14416 (equal date (calendar-current-date)))
14422 "Is the current entry marked DONE?"
14635 (todayp (equal date (calendar-current-date))) ; DATE bound by calendar
14649 ;; Past-due deadlines are only shown on the current date
14692 (todayp (equal date (calendar-current-date))) ; DATE bound by calendar
14846 ;; Extract starting and ending time and move them to prefix
15093 (let ((buf (current-buffer)))
15124 (line (org-current-line))
15125 (window-line (- line (org-current-line (window-start)))))
15239 (funcall (if (featurep 'xemacs) 'set-extent-endpoints 'move-overlay)
15240 org-hl begin end (or buffer (current-buffer))))
15312 "Show the priority of the current item.
15320 "Show the tags applicable to the current item."
15346 "Kill the entry or subtree belonging to the current agenda entry."
15355 (with-current-buffer buffer
15374 (with-current-buffer buffer (delete-region dbeg dend))
15378 "Kill the entry or subtree belonging to the current agenda entry."
15386 (with-current-buffer buffer
15399 (let ((buf (or buf (current-buffer))) m p)
15421 "Follow the link in the current line, if any."
15429 (error "No link in current line")))))
15484 "Show the subtree corresponding to the current entry in an indirect buffer.
15496 (with-current-buffer buffer
15511 (let* ((col (current-column))
15520 (with-current-buffer buffer
15532 (move-marker org-last-heading-marker (point))))
15536 (move-to-column col))))
15562 (move-to-column pl)
15596 (current-column))) ?\ )
15623 (with-current-buffer buffer
15640 the tags of the current headline come last."
15662 "Set tags for the current headline."
15673 (with-current-buffer buffer
15687 "Toggle the archive tag for the current entry."
15698 (with-current-buffer buffer
15721 (with-current-buffer buffer
15744 (move-to-column (- (window-width) (length stamp)) t)
15772 (with-current-buffer buffer
15792 (with-current-buffer buffer
15810 (with-current-buffer buffer
15817 "Return the heading of the current entry, without the stars."
15830 (with-current-buffer (marker-buffer marker)
15947 (calendar-move-hook nil)
16122 "Remove all overlays with LaTeX fragment images in current buffer."
16130 all fragments in the current text, from one headline to the next. With
16131 prefix SUBTREE, display all fragments in the current subtree. With a
16293 (defvar org-current-export-file nil) ; dynamically scoped parameter
16294 (defvar org-current-export-dir nil) ; dynamically scoped parameter
16426 \[i] export current file as iCalendar file
16430 \[F] publish current file
16431 \[P] publish current project
16444 (?F . org-publish-current-file)
16445 (?P . org-publish-current-project)
16816 ;; Find targets in comments and move them out of comments,
16846 org-current-export-file)))
16847 org-current-export-dir nil "Creating LaTeX image %s"))
16922 "Return a string with the current section number.
16951 (defvar org-ascii-current-indentation nil) ; For communication
16972 (org-ascii-current-indentation '(0 . 0))
16985 (date (format-time-string "%Y/%m/%d" (current-time)))
16986 (time (format-time-string "%X" (org-current-time)))
17098 (insert (org-fix-indentation line org-ascii-current-indentation) "\n"))))
17166 (setq org-ascii-current-indentation (cons (* 2 (1+ n)) ind)))
17177 (setq org-ascii-current-indentation '(0 . 0)))))
17180 "Create a copy of the visible part of the current buffer, and export it.
17192 current-prefix-arg))
17206 (with-current-buffer buffer (erase-buffer))
17247 (defun org-get-current-options ()
17248 "Return a string with current options as keyword options.
17309 (let ((s (org-get-current-options)))
17316 If there is no active region, the QUOTE keyword at the current headline is
17333 (setq cc (current-column))
17341 (move-to-column cc t)
17346 ((not off) (move-to-column cc t) (insert ":")))
17404 (org-current-export-dir (org-export-directory :html opt-plist))
17405 (org-current-export-file buffer-file-name)
17422 (current-dir (file-name-directory buffer-file-name))
17425 (date (format-time-string "%Y/%m/%d" (current-time)))
17426 (time (format-time-string "%X" (org-current-time)))
17704 (funcall link-validate filename current-dir)
17732 ((member type '("bbdb" "vm" "wl" "mhe" "rmail" "gnus" "shell" "info" "elisp"))
17824 ;; continue current list
18058 (with-current-buffer (get-buffer-create " org-tmp1 ")
18065 (with-current-buffer (get-buffer-create " org-tmp2 ") (erase-buffer))
18159 delimiters. It will also define a single group which contains the
18277 "Export current file as an iCalendar file.
18325 (with-current-buffer ical-buffer (erase-buffer)))
18345 The iCalendar buffer is still current when this hook is run.
18350 "Print iCalendar entries for the current Org-mode file to `standard-output'.
18355 (format-time-string (cdr org-time-stamp-formats) (current-time))
18429 (timezone (cadr (current-time-zone))))
18463 (with-current-buffer buffer
18470 (interactive (list (current-buffer)))
18474 (with-current-buffer (get-buffer buffer)
18487 (with-current-buffer out (erase-buffer))
18783 ;; How to do this: Measure non-white length of current string
18810 "Global visibility cycling or move to previous table field.
18846 Calls `org-move-subtree-up' or `org-table-kill-row' or
18847 `org-move-item-up' depending on context. See the individual commands
18852 ((org-on-heading-p) (call-interactively 'org-move-subtree-up))
18853 ((org-at-item-p) (call-interactively 'org-move-item-up))
18857 Calls `org-move-subtree-down' or `org-table-insert-row' or
18858 `org-move-item-down', depending on context. See the individual
18863 ((org-on-heading-p) (call-interactively 'org-move-subtree-down))
18864 ((org-at-item-p) (call-interactively 'org-move-item-down))
18868 "Promote heading or move table column to left.
18869 Calls `org-do-promote' or `org-table-move-column', depending on context.
18874 ((org-at-table-p) (org-call-with-arg 'org-table-move-column 'left))
18881 "Demote subtree or move table column to right.
18882 Calls `org-do-demote' or `org-table-move-column', depending on context.
18887 ((org-at-table-p) (call-interactively 'org-table-move-column))
18894 "Move subtree up or move table row up.
18895 Calls `org-move-subtree-up' or `org-table-move-row' or
18896 `org-move-item-up', depending on context. See the individual commands
18900 ((org-at-table-p) (org-call-with-arg 'org-table-move-row 'up))
18901 ((org-on-heading-p) (call-interactively 'org-move-subtree-up))
18902 ((org-at-item-p) (call-interactively 'org-move-item-up))
18906 "Move subtree down or move table row down.
18907 Calls `org-move-subtree-down' or `org-table-move-row' or
18908 `org-move-item-down', depending on context. See the individual
18912 ((org-at-table-p) (call-interactively 'org-table-move-row))
18913 ((org-on-heading-p) (call-interactively 'org-move-subtree-down))
18914 ((org-at-item-p) (call-interactively 'org-move-item-down))
18918 "Increase item in timestamp or increase priority of current headline.
18929 "Decrease item in timestamp or decrease priority of current headline.
18955 "Copy region in table or copy current subtree.
18963 "Cut region in table or cut current subtree.
18985 into the current line, aligned to `org-tags-column'. When called
18986 with prefix arg, realign all tags in the current buffer.
19001 - If the current buffer is a remember buffer, close note and file it.
19019 (message "Temporary highlights/overlays removed from current buffer"))
19020 ((and (local-variable-p 'org-finish-function (current-buffer))
19127 ["Which Column?" org-table-current-column (org-at-table-p)])
19254 ("Special views current file"
19348 `(["Browse Org group" org-customize t]
19353 ["Reset to Current" Custom-reset-current t]
19365 "Return a list of contexts of the current cursor position.
19402 (push (org-point-in-group p 1 :headline-stars) clist)
19403 (push (org-point-in-group p 2 :todo-keyword) clist)
19404 (push (org-point-in-group p 4 :tags) clist))
19408 (push (org-point-in-group p 0 :priority) clist)))
19411 (push (org-point-in-group p 2 :item-bullet) clist)
19416 (push (org-point-in-group p 0 :checkbox) clist)))
19431 (push (org-point-in-group p 0 :timestamp) clist))
19441 (push (org-point-in-group p 0 :target) clist)
19444 (push (org-point-in-group p 0 :radio-target) clist))
19464 Normally only the current line is checked, but you can include NLINES extra
19479 (defun org-point-in-group (point group &optional context)
19480 "Check if POINT is in match-group GROUP.
19482 match. If the match group does ot exist or point is not inside it,
19484 (and (match-beginning group)
19485 (>= point (match-beginning group))
19486 (<= point (match-end group))
19488 (list context (match-beginning group) (match-end group))
19505 (defun org-move-line-down (arg)
19506 "Move the current line down. With prefix argument, move it past ARG lines."
19508 (let ((col (current-column))
19513 (setq pos (move-marker (make-marker) (point)))
19516 (move-to-column col)))
19518 (defun org-move-line-up (arg)
19519 "Move the current line up. With prefix argument, move it past ARG lines."
19521 (let ((col (current-column))
19526 (setq pos (move-marker (make-marker) (point)))
19529 (move-to-column col)))
19559 "Is point inside a match of REGEXP in the current line?"
19659 "Go to the beginning of the current line. If that is invisible, continue
19700 With argument, move up ARG levels."
19709 move point."
19726 "Show all siblings of the current headline."
19739 "Flag the current heading. FLAG non-nil means make invisible.
19792 (re-search-forward (concat "[\r\n]\\(" outline-regexp "\\)") nil 'move)
19840 "Unhide the current position, to show the bookmark location."