diff options
| -rw-r--r-- | lisp/isearch.el | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/lisp/isearch.el b/lisp/isearch.el index 3ec972a39ec..2c20d45bbd8 100644 --- a/lisp/isearch.el +++ b/lisp/isearch.el | |||
| @@ -778,40 +778,40 @@ REGEXP says which ring to use." | |||
| 778 | 778 | ||
| 779 | (defsubst isearch-string (frame) | 779 | (defsubst isearch-string (frame) |
| 780 | "Return the search string in FRAME." | 780 | "Return the search string in FRAME." |
| 781 | (aref 0 frame)) | 781 | (aref frame 0)) |
| 782 | (defsubst isearch-message-string (frame) | 782 | (defsubst isearch-message-string (frame) |
| 783 | "Return the search string to display to the user in FRAME." | 783 | "Return the search string to display to the user in FRAME." |
| 784 | (aref 1 frame)) | 784 | (aref frame 1)) |
| 785 | (defsubst isearch-point (frame) | 785 | (defsubst isearch-point (frame) |
| 786 | "Return the point in FRAME." | 786 | "Return the point in FRAME." |
| 787 | (aref 2 frame)) | 787 | (aref frame 2)) |
| 788 | (defsubst isearch-success (frame) | 788 | (defsubst isearch-success (frame) |
| 789 | "Return the success flag in FRAME." | 789 | "Return the success flag in FRAME." |
| 790 | (aref 3 frame)) | 790 | (aref frame 3)) |
| 791 | (defsubst isearch-forward-flag (frame) | 791 | (defsubst isearch-forward-flag (frame) |
| 792 | "Return the searching-forward flag in FRAME." | 792 | "Return the searching-forward flag in FRAME." |
| 793 | (aref 4 frame)) | 793 | (aref frame 4)) |
| 794 | (defsubst isearch-other-end (frame) | 794 | (defsubst isearch-other-end (frame) |
| 795 | "Return the other end of the match in FRAME." | 795 | "Return the other end of the match in FRAME." |
| 796 | (aref 5 frame)) | 796 | (aref frame 5)) |
| 797 | (defsubst isearch-word (frame) | 797 | (defsubst isearch-word (frame) |
| 798 | "Return the search-by-word flag in FRAME." | 798 | "Return the search-by-word flag in FRAME." |
| 799 | (aref 6 frame)) | 799 | (aref frame 6)) |
| 800 | (defsubst isearch-invalid-regexp (frame) | 800 | (defsubst isearch-invalid-regexp (frame) |
| 801 | "Return the regexp error message in FRAME, or nil if its regexp is valid." | 801 | "Return the regexp error message in FRAME, or nil if its regexp is valid." |
| 802 | (aref 7 frame)) | 802 | (aref frame 7)) |
| 803 | (defsubst isearch-wrapped (frame) | 803 | (defsubst isearch-wrapped (frame) |
| 804 | "Return the search-wrapped flag in FRAME." | 804 | "Return the search-wrapped flag in FRAME." |
| 805 | (aref 8 frame)) | 805 | (aref frame 8)) |
| 806 | (defsubst isearch-barrier (frame) | 806 | (defsubst isearch-barrier (frame) |
| 807 | "Return the barrier value in FRAME." | 807 | "Return the barrier value in FRAME." |
| 808 | (aref 9 frame)) | 808 | (aref frame 9)) |
| 809 | (defsubst isearch-within-brackets (frame) | 809 | (defsubst isearch-within-brackets (frame) |
| 810 | "Return the in-character-class flag in FRAME." | 810 | "Return the in-character-class flag in FRAME." |
| 811 | (aref 10 frame)) | 811 | (aref frame 10)) |
| 812 | (defsubst isearch-case-fold-search (frame) | 812 | (defsubst isearch-case-fold-search (frame) |
| 813 | "Return the case-folding flag in FRAME." | 813 | "Return the case-folding flag in FRAME." |
| 814 | (aref 11 frame)) | 814 | (aref frame 11)) |
| 815 | 815 | ||
| 816 | (defun isearch-top-state () | 816 | (defun isearch-top-state () |
| 817 | (let ((cmd (car isearch-cmds))) | 817 | (let ((cmd (car isearch-cmds))) |