• Home
  • History
  • Annotate
  • Raw
  • Download
  • only in /macosx-10.10.1/emacs-93/emacs/lisp/textmodes/

Lines Matching +defs:arrow +defs:char

387 whitestart  Only at the beginning of lines, before the first non-white char.
394 (const :tag "Before first char in a line" whitestart)
639 `delete-char', and `backward-delete-char' in Org-mode buffers, with a
1531 (character :tag "Access char"))
1669 key The key (a single char as a string) to be associated with the command.
2353 terminated by almost any nonword/nondigit char.
3160 (goto-char (point-min))
3214 (string-to-char (match-string 2 e)))
3587 (and pos (goto-char pos))
3723 (backward-char 1)
3839 (goto-char e)
3854 (goto-char (point-min))
4101 (get-char-property (1- (point)) 'invisible))
4181 (goto-char (point-min))
4184 (goto-char (match-beginning 0))
4195 (goto-char (point-max))
4199 (error (goto-char (point-min))))
4228 (goto-char (point-min))
4287 (goto-char selected-point)
4319 (goto-char org-goto-start-pos)
4321 (goto-char (point-min)))
4360 (or (eobp) (forward-char 1))
4433 (goto-char pos)
4477 (save-excursion (backward-char 1) (not (org-invisible-p))))
4480 (backward-char 1) (not (org-invisible-p))))
4486 (unless (= (point) pos) (just-one-space) (backward-delete-char 1))
4557 ((equal (char-after) ?\ ) (forward-char 1))))))
4614 (goto-char beg)
4637 (goto-char (match-end 0))
4651 (goto-char (point-min))
4665 (goto-char (point-min))
4673 (goto-char (point-min))
4710 (goto-char beg)
4713 (progn (goto-char beg)
4727 (goto-char ins-point)
4758 (if (equal (char-after) ?\n) (forward-char 1))
4760 (goto-char beg)
4837 (progn (insert "\n") (backward-char 1)))
4846 (goto-char beg)
4855 (goto-char (point-min))
4927 (goto-char (region-beginning))
4935 (goto-char start)
4940 (goto-char (point-min))
4943 (goto-char start)
4967 (goto-char start)
4971 (goto-char beg)
4979 (goto-char start)
4995 (setq sorting-type (read-char-exclusive)))
5031 (goto-char (point-at-bol))
5079 (unless (= (point) pos) (just-one-space) (backward-delete-char 1)))
5090 (goto-char (match-end 0))
5110 (goto-char beg)
5141 (goto-char (point-min))
5144 (goto-char beg)
5155 (goto-char e1)
5162 (goto-char b1)
5240 (goto-char pos)
5263 (goto-char pos)
5276 (goto-char pos)
5287 (goto-char beg)
5297 (error (goto-char pos)
5320 (goto-char pos)
5322 (goto-char pos)
5336 (goto-char beg)
5346 (error (goto-char beg)
5356 (goto-char pos)
5358 (goto-char pos)
5420 (goto-char (match-beginning 3))
5447 (goto-char beg)
5522 (goto-char (point-max))
5536 (goto-char (point-min))
5543 (goto-char (match-end 0))
5545 (goto-char (point-max))
5556 (goto-char (point-max)) (insert "\n"))
5567 (goto-char (or (match-end 2) (match-beginning 3)))
5605 (goto-char begm)
5609 (goto-char beg)
5611 (goto-char end)
5612 (goto-char beg)
5620 (goto-char end)))))
5632 (goto-char beg)
5648 (goto-char beg)
5816 (goto-char pos)
5822 (goto-char pos)))
5836 (goto-char beg)
5839 (goto-char end)
5840 (if (bolp) (backward-char 1) (end-of-line 1))
5846 (goto-char beg)
5853 (goto-char beg)
5856 (goto-char beg)
5889 (goto-char (point-min))
5893 (goto-char (point-min))
5896 (goto-char (min (1+ (point)) (point-max))))
5897 (goto-char (point-min))
5901 (delete-char 1)))
5902 (goto-char (point-min))
5925 (defconst org-narrow-column-arrow "=>"
5955 (goto-char beg)
5957 (goto-char beg)
5961 (when links (goto-char beg) (while (org-activate-bracket-links end)))
5963 (when dates (goto-char beg) (while (org-activate-dates end)))
5966 (goto-char beg)
6023 (list 'display org-narrow-column-arrow)
6076 (goto-char org-table-aligned-begin-marker)
6118 (progn (goto-char (point-min)) (point))
6119 (goto-char (match-beginning 0))
6131 (goto-char (point-max))
6132 (goto-char (match-beginning 0)))
6172 (goto-char pos))))))
6194 (goto-char (match-beginning 1)))
6199 (if (looking-at " ") (forward-char 1))))
6219 (goto-char (match-end 0))))
6242 (if (looking-at " ") (forward-char 1)))))
6307 (backward-char 1)
6313 (goto-char (+ 2 pos))
6323 (backward-char 1)
6329 (goto-char (min (point-at-eol) (+ 2 pos)))
6331 (forward-char 1) ""))
6349 (goto-char pos)
6384 (goto-char (org-table-begin))
6407 ; (backward-char 2) t)))))
6411 (backward-char 1)
6412 (if (looking-at " ") (forward-char 1))))))
6428 (goto-char (org-table-begin 'any))
6477 (goto-char beg)
6522 (goto-char beg)
6564 (goto-char beg)
6602 (goto-char pos)
6605 (goto-char pos)
6721 (goto-char beg)
6724 (goto-char end)
6732 (goto-char tbeg)
6734 (goto-char pos)
6737 (goto-char tend)
6742 (goto-char beg)
6774 (goto-char beg)
6778 (goto-char end)
6846 (goto-char beg)
6849 (goto-char beg))
6855 (goto-char beg)
6859 (goto-char beg)
6865 (goto-char beg)
6870 (goto-char beg)
6873 (goto-char beg)))))
6902 (cline (save-excursion (goto-char beg) (org-current-line)))
6903 (ccol (save-excursion (goto-char beg) (org-table-current-column)))
6935 (goto-char (match-beginning 0))
6963 (goto-char (setq p (point-max)))
6968 (goto-char p)
6983 (goto-char (point-min))
6991 (goto-char pos)
7073 (goto-char (point-min))
7108 (goto-char (org-table-begin))
7113 (goto-char (org-table-end))
7230 (goto-char (org-table-end))
7234 (goto-char (match-beginning 2))
7240 (if (equal (string-to-char (car x)) ?@) "" "$")
7250 (goto-char (org-table-end))
7270 (goto-char (org-table-end))
7301 (goto-char beg)
7312 (goto-char beg)
7319 (goto-char beg)
7335 (goto-char beg)
7363 (setq named (equal (string-to-char field) ?:)
7401 (goto-char beg)
7408 (setq newchar (char-to-string (read-char-exclusive))
7539 (setq c (string-to-char (match-string 1 fmt))
7657 (if (not (equal (string-to-char desc) ?@))
7673 (if (memq (string-to-char c1) '(?- ?+)) col 0))))
7675 (if (memq (string-to-char c2) '(?- ?+)) col 0))))
7818 (if (<= (string-to-char (car eq)) ?9)
7825 (goto-char (setq beg (org-table-begin)))
7837 (goto-char beg)
7970 (setq s (concat (if (equal (string-to-char (car entry)) ?@) "" "$")
7974 (goto-char (point-min))
7993 (goto-char (point-min))
8005 (goto-char pos)
8022 (goto-char pos)
8033 (goto-char pos)
8035 ((looking-at "[$@0-9a-zA-Z]+ *= *[^ \t\n']") (goto-char pos))
8039 (goto-char (- (match-end 0) 2))
8050 (goto-char (point-min))
8056 (goto-char (1+ (point-min)))
8060 (goto-char (point-max))
8061 (backward-delete-char 1)))
8062 (goto-char beg))
8093 (or (equal (string-to-char match) ?@) (setq match (concat "@" match)))
8107 (goto-char pos)
8140 (goto-char (org-table-begin))
8144 (goto-char (match-beginning 1))
8154 (goto-char (org-table-begin))
8157 (goto-char (match-beginning 1))
8170 (goto-char pos)
8177 (goto-char min)
8179 (goto-char pos))))
8191 (goto-char (if (< (abs (- p1 (point))) (abs (- p2 (point))))
8193 ((or p1 p2) (goto-char (or p1 p2)))
8227 (or (org-at-table-p) (goto-char p))
8256 (goto-char (min beg end))
8259 (goto-char (max beg end))
8273 (goto-char b))
8294 (goto-char (org-table-begin))
8431 'display org-narrow-column-arrow))
8543 'delete-char 'org-delete-char
8544 'delete-backward-char 'org-delete-backward-char)
8616 (goto-char action)
8665 (goto-char (1- (match-end 0)))
8666 (delete-backward-char 1)
8667 (goto-char (match-beginning 0))
8693 (goto-char (org-table-begin))
8731 (goto-char (point-min))
8735 (goto-char (match-beginning 0))
8742 (goto-char beg)
8791 (goto-char pos)))
9376 (goto-char (point-min))
9545 (goto-char (point-min))
9551 (if a (goto-char (nth 2 a)))
9554 (goto-char (match-beginning 0))
9556 (goto-char pos)
9565 (goto-char (point-max))
9571 (if a (goto-char (nth 1 a)))
9574 (goto-char (match-beginning 0))
9576 (goto-char pos)
9841 (goto-char (point-min))
9847 (goto-char pos))
9858 (when (equal (string-to-char s) ?*)
9885 (t (goto-char (point-min))
9894 (goto-char (match-beginning 1))
9895 (goto-char pos)
9899 (goto-char (point-min))
9901 (goto-char (match-beginning 0))
9911 (goto-char (match-end group))
9948 (goto-char (point-min))
9954 (goto-char (point-min))
9997 (goto-char m)
10098 (goto-char (point-min))
10133 (goto-char (point-max))
10285 (goto-char (point-min))
10288 (goto-char (match-beginning 0)))
10294 (save-excursion (set-buffer b) (goto-char p)
10422 (defun org-remember-apply-template (&optional use-char skip-interactive)
10428 (let* ((char (or use-char
10433 (lambda (x) (char-to-string (car x)))
10435 (read-char-exclusive))))
10436 (entry (cdr (assoc char org-remember-templates)))
10452 org-time-was-given x prompt char time)
10464 (insert tpl) (goto-char (point-min))
10479 (goto-char (point-min))
10492 (goto-char (point-min))
10494 (setq char (if (match-end 3) (match-string 3))
10496 (goto-char (match-beginning 0))
10498 (if char
10500 (setq org-time-was-given (equal (upcase char) char))
10501 (setq time (org-read-date (equal (upcase char) "U") t nil
10504 (member char '("u" "U"))))
10507 (goto-char (point-min))
10510 (and (re-search-forward "^[^#\n]" nil t) (backward-char 1))))
10567 (goto-char (point-min))
10600 (save-excursion (and (goto-char (point-min))
10610 (goto-char (point-min))
10623 (goto-char spos)
10628 (goto-char (point-max))
10635 (goto-char (point-min))
10686 (goto-char (point-min))
10690 (if pos (goto-char pos))
10726 (goto-char begdel)
10736 (goto-char (point-min))
10738 (goto-char (setq pos (match-beginning 0)))
10742 (goto-char pos)
10766 (goto-char pos)))
10778 (goto-char beg)
10779 (goto-char pos)
10811 (searchhead (equal (char-before beg) ?*))
10812 (tag (equal (char-before beg1) ?:))
10813 (texp (equal (char-before beg) ?\\))
10814 (link (equal (char-before beg) ?\[))
10845 (goto-char (point-min))
10901 (goto-char (match-end 0))
10934 (if (looking-at outline-regexp) (goto-char (match-end 0)))
11008 (goto-char (or (match-end 2) (match-end 1)))
11112 (goto-char (match-end 1))
11114 (goto-char (1+ (match-end 0)))
11121 (backward-char 1)
11128 (goto-char (point-min))
11138 (goto-char (point-max))
11141 (if (not (equal (char-before) ?\ )) " " "")
11150 (goto-char (point-min))
11174 (goto-char (match-end 0)))
11187 (goto-char org-log-note-marker)
11227 (goto-char org-log-note-marker)
11237 (goto-char org-log-note-return-to))
11258 (goto-char (point-min))
11369 (setq current (string-to-char (match-string 2))
11375 (setq new (read-char-exclusive))
11396 (goto-char (match-end 2))
11398 (goto-char (match-beginning 3))
11411 (string-to-char (match-string 2 s)))))))
11440 (goto-char (point-min))
11446 (goto-char (setq lspos (1+ (match-beginning 0))))
11481 (goto-char lspos)
11546 re-p (equal (string-to-char tag) ?{)
11572 re-p (equal (string-to-char kwd) ?{)
11612 (goto-char (point-min))
11653 (goto-char (match-beginning 0))
11732 tg cnt e c char c1 c2 ntable tbl rtn
11763 (setq tbl table char ?a cnt 0)
11780 (setq c1 (string-to-char
11782 tg (if (= (string-to-char tg) ?@) 1 0)))))
11784 (while (or (rassoc char ntable) (rassoc char table))
11785 (setq char (1+ char)))
11787 (setq c (or c2 char)))
11804 (goto-char (point-min))
11813 (setq c (let ((inhibit-quit t)) (read-char-exclusive)))
11818 (goto-char (point-min))
11868 (goto-char (point-min))
11881 (goto-char (point-min)))))
11901 (goto-char (point-min))
12287 (goto-char (point-at-bol))
12323 (goto-char match-end)
12325 (and (looking-at " *|") (goto-char (match-end 0))))
12416 (if (> (point) 1) (backward-char 1))
12451 inactive (= (char-after (match-beginning 0)) ?\[)
12481 (goto-char pos)
12545 (insert "\n") (backward-char 1)
12562 (goto-char org-clock-marker)
12568 (goto-char org-clock-marker)
12589 (goto-char org-clock-marker)
12613 (goto-char (point-max))
12635 (goto-char (match-beginning 0))
12650 (goto-char (point-min))
12652 (goto-char p)
12858 (goto-char (point-min))
12860 (goto-char p)
12871 (goto-char ins)
12880 (goto-char ins)
12881 (backward-delete-char 1)
12882 (goto-char ipos)
12898 (goto-char (point-min))
12916 (goto-char next)
12922 (goto-char cont)))
13296 (goto-char (point-min))
13300 (setq c (read-char-exclusive))
13307 (goto-char (point-max))
13309 (goto-char (point-min)))
13325 (setq c (read-char-exclusive)))
13330 ((setq entry (assoc (char-to-string c) org-agenda-custom-commands))
13403 (goto-char (point-min)))
13415 (flet ((read-char-exclusive () (string-to-char cmd-key)))
13569 (let ((r (downcase (read-char-exclusive))))
13585 (goto-char (point-max))
13617 (goto-char (point-min))
13641 (goto-char (point-min))
13645 (goto-char (point-min))
13673 (if (equal (char-after p) ?#) (throw :skip t))
13678 (goto-char to)
13736 (goto-char (point-min))
13833 (goto-char (point-min))
13834 (goto-char (or (text-property-any (point-min) (point-max) 'org-today t)
13852 (goto-char beg)
13858 (goto-char beg)
14006 (goto-char (point-min))
14010 (goto-char (1- (point-max)))
14014 (goto-char (or start-pos 1))
14016 (goto-char (or start-pos 1))
14085 (goto-char (point-min))
14151 (goto-char (point-min))
14258 (goto-char (point-min))
14267 (goto-char (point-min))
14270 (goto-char (point-min))
14463 (goto-char (point-min))
14469 (when (or (and org-agenda-todo-ignore-scheduled (goto-char beg)
14471 (and org-agenda-todo-ignore-deadlines (goto-char beg)
14474 (goto-char beg)
14477 (goto-char beg)
14479 (goto-char (match-beginning 1))
14496 (goto-char (match-end 1))
14521 (goto-char (point-min))
14545 (goto-char (match-end 1))
14592 (goto-char (point-min))
14608 (goto-char (match-end 1))
14639 (goto-char (point-min))
14655 (goto-char (match-end 0))
14696 (goto-char (point-min))
14711 (goto-char (match-end 0))
14744 (goto-char (point-min))
14763 (goto-char (match-end 1))
14776 (goto-char pos)))
15016 (goto-char (+ (point) (or (get-text-property (point) 'prefix-length) 0)))
15140 (tdpos (goto-char tdpos))
15149 (goto-char
15218 (if (looking-at "^\\S-") (forward-char 1))
15221 (backward-char 1)
15223 (goto-char (match-beginning 0)))
15305 (and (eolp) (not (bolp)) (backward-char 1))
15337 (goto-char pos)
15357 (goto-char pos)
15363 (goto-char dbeg)
15389 (goto-char pos)
15408 (goto-char (point-max))
15441 (goto-char pos)
15498 (goto-char pos)
15522 (goto-char pos)
15528 (and (bolp) (forward-char 1))
15548 (goto-char (point-max))
15589 (goto-char (if line (point-at-bol) (point-min)))
15593 (goto-char (match-beginning 1))
15625 (goto-char pos)
15646 (goto-char (or pos (point)))
15675 (goto-char pos)
15700 (goto-char pos)
15723 (goto-char pos)
15741 (goto-char (point-max))
15774 (goto-char pos)
15794 (goto-char pos)
15812 (goto-char pos)
15832 (goto-char pos)
15857 (let* ((char (progn
15859 (read-char-exclusive)))
15860 (cmd (cdr (assoc char
15873 (error "No command associated with <%c>" char))
15875 (or (not (equal ?b char))
16060 (goto-char pos)
16072 (goto-char pos)
16078 (goto-char pos)
16152 (goto-char (max (point-min) (- (cdr at) 2)))
16198 (goto-char (point-min))
16208 (goto-char beg)
16227 (goto-char end))
16335 (goto-char 0)
16454 (setq r1 (read-char-exclusive)))
16781 (goto-char (point-min))
16791 (goto-char (point-min))
16796 (goto-char (point-min))
16802 (goto-char (point-min))
16809 (goto-char (point-min))
16811 (goto-char (match-beginning 0))
16818 (goto-char (point-min))
16823 (goto-char (point-min))
16828 (goto-char (point-min))
16835 (goto-char (point-min))
16839 (goto-char (match-beginning 0))))
16852 (goto-char (point-min))
16859 (goto-char (point-min))
16866 (goto-char (point-min))
16881 (goto-char (point-min))
16884 (subst-char-in-region (match-beginning 0) (match-end 0) ?\n ?\ t)
16885 (goto-char (1- (match-end 0))))))
16916 (- (string-to-char number-string) ?A -1))
17103 (goto-char (point-min))
17107 (goto-char beg)
17109 (goto-char (point-min))
17113 (goto-char beg)))
17114 (goto-char (point-min))))
17152 (let (char (n (- level umax 1)) (ind 0))
17156 (char-to-string (nth (% n (length org-export-ascii-bullets))
17167 (if (or (not (equal (char-before) ?\n))
17168 (not (equal (char-before (1- (point))) ?\n)))
17170 (setq char (nth (- umax level) (reverse org-export-ascii-underline)))
17176 (insert title "\n" (make-string (string-width title) char) "\n")
17191 (read-char-exclusive))
17208 (setq s (goto-char (point-min)))
17210 (goto-char (org-find-invisible))
17212 (setq s (goto-char (org-find-visible))))
17213 (goto-char (point-min))
17232 (goto-char (point-min)))))
17237 (get-char-property s 'invisible)))
17242 (not (get-char-property s 'invisible))))
17332 (goto-char beg)
17355 (goto-char (match-end 0))
17638 ((and org-export-with-toc (equal (string-to-char line) ?*))
17882 (goto-char (point-min))
17885 (goto-char (point-min))
17889 (goto-char (point-min))
18061 (goto-char (point-min))
18360 (goto-char (point-min))
18369 (goto-char (match-end 0))
18398 (goto-char (point-min))
18408 (setq pri (string-to-char (match-string 2 hd))
18475 (goto-char (point-min)) ;; CD: beginning-of-buffer is not allowed.
18496 (goto-char (match-end 0))
18542 (goto-char (point-min))
18706 (if (or (equal (char-after) ?\ ) (looking-at "[^|\n]* |"))
18715 (goto-char (1- (match-end 0)))
18716 (delete-backward-char 1)
18717 (goto-char (match-beginning 0))
18722 (defun org-delete-backward-char (N)
18723 "Like `delete-backward-char', insert whitespace at field end in tables.
18736 (backward-delete-char N)
18739 (goto-char (1- pos))
18743 (backward-delete-char N)))
18745 (defun org-delete-char (N)
18746 "Like `delete-char', but insert whitespace at field end in tables.
18754 (not (= (char-after) ?|))
18763 (goto-char pos)
18767 (delete-char N))
18768 (delete-char N)))
18773 (put 'org-delete-char 'delete-selection 'supersede)
18774 (put 'org-delete-backward-char 'delete-selection 'supersede)
18779 (put 'org-delete-char 'flyspell-delayed t)
18780 (put 'org-delete-backward-char 'flyspell-delayed t)
18801 'delete-char 'org-delete-char
18802 'delete-backward-char 'org-delete-backward-char)
19405 (goto-char p)
19406 (skip-chars-backward "^[\n\r \t") (or (eobp) (backward-char 1))
19426 (goto-char p)
19442 (goto-char (1- (match-beginning 0)))
19445 (goto-char p))
19515 (goto-char pos)
19528 (goto-char pos)
19616 (cond ((equal (char-after (point-at-bol)) ?*) t) ; skip headlines
19665 (backward-char 1)
19668 (backward-char 1)
19670 (forward-char 1))))
19679 (get-char-property (point) 'invisible)))
19684 (if (and (eolp) (not (bobp))) (backward-char 1))
19688 (get-char-property (point) 'invisible))))
19717 (or previous (forward-char 1))
19720 (when (< l level) (goto-char pos) (throw 'exit nil))
19721 (when (= l level) (goto-char (match-beginning 0)) (throw 'exit t)))
19722 (goto-char pos)
19766 (if (memq (preceding-char) '(?\n ?\^M))
19769 (forward-char -1)
19770 (if (memq (preceding-char) '(?\n ?\^M))
19772 (forward-char -1)))))
19843 (save-excursion (goto-char (max (point-min) (1- (point))))