aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/replace.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/replace.el')
-rw-r--r--lisp/replace.el32
1 files changed, 16 insertions, 16 deletions
diff --git a/lisp/replace.el b/lisp/replace.el
index 0b57ea35fc1..cd95f8cfb7b 100644
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -28,7 +28,7 @@
28;;; Code: 28;;; Code:
29 29
30(defcustom case-replace t 30(defcustom case-replace t
31 "*Non-nil means `query-replace' should preserve case in replacements." 31 "Non-nil means `query-replace' should preserve case in replacements."
32 :type 'boolean 32 :type 'boolean
33 :group 'matching) 33 :group 'matching)
34 34
@@ -62,24 +62,24 @@ strings or patterns."
62 :version "20.3") 62 :version "20.3")
63 63
64(defcustom query-replace-skip-read-only nil 64(defcustom query-replace-skip-read-only nil
65 "*Non-nil means `query-replace' and friends ignore read-only matches." 65 "Non-nil means `query-replace' and friends ignore read-only matches."
66 :type 'boolean 66 :type 'boolean
67 :group 'matching 67 :group 'matching
68 :version "22.1") 68 :version "22.1")
69 69
70(defcustom query-replace-show-replacement t 70(defcustom query-replace-show-replacement t
71 "*Non-nil means to show what actual replacement text will be." 71 "Non-nil means to show what actual replacement text will be."
72 :type 'boolean 72 :type 'boolean
73 :group 'matching 73 :group 'matching
74 :version "23.1") 74 :version "23.1")
75 75
76(defcustom query-replace-highlight t 76(defcustom query-replace-highlight t
77 "*Non-nil means to highlight matches during query replacement." 77 "Non-nil means to highlight matches during query replacement."
78 :type 'boolean 78 :type 'boolean
79 :group 'matching) 79 :group 'matching)
80 80
81(defcustom query-replace-lazy-highlight t 81(defcustom query-replace-lazy-highlight t
82 "*Controls the lazy-highlighting during query replacements. 82 "Controls the lazy-highlighting during query replacements.
83When non-nil, all text in the buffer matching the current match 83When non-nil, all text in the buffer matching the current match
84is highlighted lazily using isearch lazy highlighting (see 84is highlighted lazily using isearch lazy highlighting (see
85`lazy-highlight-initial-delay' and `lazy-highlight-interval')." 85`lazy-highlight-initial-delay' and `lazy-highlight-interval')."
@@ -773,19 +773,19 @@ a previously found match."
773 "Auto Occurrence Display" 773 "Auto Occurrence Display"
774 "Display another occurrence when moving the cursor")) 774 "Display another occurrence when moving the cursor"))
775 (define-key map [separator-1] '("--")) 775 (define-key map [separator-1] '("--"))
776 (define-key map [kill-this-buffer] 776 (define-key map [kill-this-buffer]
777 '(menu-item "Kill occur buffer" kill-this-buffer 777 '(menu-item "Kill occur buffer" kill-this-buffer
778 :help "Kill the current *Occur* buffer")) 778 :help "Kill the current *Occur* buffer"))
779 (define-key map [quit-window] 779 (define-key map [quit-window]
780 '(menu-item "Quit occur window" quit-window 780 '(menu-item "Quit occur window" quit-window
781 :help "Quit the current *Occur* buffer. Bury it, and maybe delete the selected frame")) 781 :help "Quit the current *Occur* buffer. Bury it, and maybe delete the selected frame"))
782 (define-key map [revert-buffer] 782 (define-key map [revert-buffer]
783 '(menu-item "Revert occur buffer" revert-buffer 783 '(menu-item "Revert occur buffer" revert-buffer
784 :help "Replace the text in the *Occur* buffer with the results of rerunning occur")) 784 :help "Replace the text in the *Occur* buffer with the results of rerunning occur"))
785 (define-key map [clone-buffer] 785 (define-key map [clone-buffer]
786 '(menu-item "Clone occur buffer" clone-buffer 786 '(menu-item "Clone occur buffer" clone-buffer
787 :help "Create and return a twin copy of the current *Occur* buffer")) 787 :help "Create and return a twin copy of the current *Occur* buffer"))
788 (define-key map [occur-rename-buffer] 788 (define-key map [occur-rename-buffer]
789 '(menu-item "Rename occur buffer" occur-rename-buffer 789 '(menu-item "Rename occur buffer" occur-rename-buffer
790 :help "Rename the current *Occur* buffer to *Occur: original-buffer-name*.")) 790 :help "Rename the current *Occur* buffer to *Occur: original-buffer-name*."))
791 (define-key map [separator-2] '("--")) 791 (define-key map [separator-2] '("--"))
@@ -798,10 +798,10 @@ a previously found match."
798 (define-key map [occur-mode-display-occurrence] 798 (define-key map [occur-mode-display-occurrence]
799 '(menu-item "Display Occurrence" occur-mode-display-occurrence 799 '(menu-item "Display Occurrence" occur-mode-display-occurrence
800 :help "Display in another window the occurrence the current line describes")) 800 :help "Display in another window the occurrence the current line describes"))
801 (define-key map [occur-next] 801 (define-key map [occur-next]
802 '(menu-item "Move to next match" occur-next 802 '(menu-item "Move to next match" occur-next
803 :help "Move to the Nth (default 1) next match in an Occur mode buffer")) 803 :help "Move to the Nth (default 1) next match in an Occur mode buffer"))
804 (define-key map [occur-prev] 804 (define-key map [occur-prev]
805 '(menu-item "Move to previous match" occur-prev 805 '(menu-item "Move to previous match" occur-prev
806 :help "Move to the Nth (default 1) previous match in an Occur mode buffer")) 806 :help "Move to the Nth (default 1) previous match in an Occur mode buffer"))
807 map) 807 map)
@@ -970,7 +970,7 @@ Compatibility function for \\[next-error] invocations."
970 :version "22.1") 970 :version "22.1")
971 971
972(defcustom list-matching-lines-default-context-lines 0 972(defcustom list-matching-lines-default-context-lines 0
973 "*Default number of context lines included around `list-matching-lines' matches. 973 "Default number of context lines included around `list-matching-lines' matches.
974A negative number means to include that many lines before the match. 974A negative number means to include that many lines before the match.
975A positive number means to include that many lines both before and after." 975A positive number means to include that many lines both before and after."
976 :type 'integer 976 :type 'integer
@@ -979,13 +979,13 @@ A positive number means to include that many lines both before and after."
979(defalias 'list-matching-lines 'occur) 979(defalias 'list-matching-lines 'occur)
980 980
981(defcustom list-matching-lines-face 'match 981(defcustom list-matching-lines-face 'match
982 "*Face used by \\[list-matching-lines] to show the text that matches. 982 "Face used by \\[list-matching-lines] to show the text that matches.
983If the value is nil, don't highlight the matching portions specially." 983If the value is nil, don't highlight the matching portions specially."
984 :type 'face 984 :type 'face
985 :group 'matching) 985 :group 'matching)
986 986
987(defcustom list-matching-lines-buffer-name-face 'underline 987(defcustom list-matching-lines-buffer-name-face 'underline
988 "*Face used by \\[list-matching-lines] to show the names of buffers. 988 "Face used by \\[list-matching-lines] to show the names of buffers.
989If the value is nil, don't highlight the buffer names specially." 989If the value is nil, don't highlight the buffer names specially."
990 :type 'face 990 :type 'face
991 :group 'matching) 991 :group 'matching)
@@ -993,7 +993,7 @@ If the value is nil, don't highlight the buffer names specially."
993(defcustom occur-excluded-properties 993(defcustom occur-excluded-properties
994 '(read-only invisible intangible field mouse-face help-echo local-map keymap 994 '(read-only invisible intangible field mouse-face help-echo local-map keymap
995 yank-handler follow-link) 995 yank-handler follow-link)
996 "*Text properties to discard when copying lines to the *Occur* buffer. 996 "Text properties to discard when copying lines to the *Occur* buffer.
997The value should be a list of text properties to discard or t, 997The value should be a list of text properties to discard or t,
998which means to discard all text properties." 998which means to discard all text properties."
999 :type '(choice (const :tag "All" t) (repeat symbol)) 999 :type '(choice (const :tag "All" t) (repeat symbol))