comparison lisp/emacs-lisp/re-builder.el @ 28097:5d7390b72a44

(reb-re-syntax): Fix typo in `:type'. Fix comment.
author Gerd Moellmann <gerd@gnu.org>
date Sun, 12 Mar 2000 13:45:25 +0000
parents 30c2ad45d57b
children 7a7b3b2c177a
comparison
equal deleted inserted replaced
28096:244f283b3d03 28097:5d7390b72a44
22 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, 22 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
23 ;; Boston, MA 02111-1307, USA. 23 ;; Boston, MA 02111-1307, USA.
24 24
25 ;;; Commentary: 25 ;;; Commentary:
26 26
27 ;; $Id: re-builder.el,v 1.3 2000/01/25 23:42:24 dzu Exp $ 27 ;; $Id: re-builder.el,v 1.1 2000/03/09 20:20:32 gerd Exp $
28 28
29 ;; When I have to come up with regular expressions that are more 29 ;; When I have to come up with regular expressions that are more
30 ;; complex than simple string matchers, especially if they contain sub 30 ;; complex than simple string matchers, especially if they contain sub
31 ;; expressions, I find myself spending quite some time in the 31 ;; expressions, I find myself spending quite some time in the
32 ;; `development cycle'. `re-builder' aims to shorten this time span 32 ;; `development cycle'. `re-builder' aims to shorten this time span
101 ;; digit keys are assigned to perform an update that will flash the 101 ;; digit keys are assigned to perform an update that will flash the
102 ;; corresponding subexp only. 102 ;; corresponding subexp only.
103 103
104 104
105 ;;; History: 105 ;;; History:
106 ;;
107 ;; Changes from Version 1.2:
108 ;; - Fixed a bug preventing normal startup after killing the (previous)
109 ;; target-buffer
110 ;; - Fixed XEmacs support
106 ;; 111 ;;
107 ;; Changes from Version 1.2: 112 ;; Changes from Version 1.2:
108 ;; - Fixed a bug preventing normal startup after killing the (previous) 113 ;; - Fixed a bug preventing normal startup after killing the (previous)
109 ;; target-buffer 114 ;; target-buffer
110 ;; - Fixed XEmacs support 115 ;; - Fixed XEmacs support
140 :group 're-builder 145 :group 're-builder
141 :type 'hook) 146 :type 'hook)
142 147
143 (defcustom reb-re-syntax 'read 148 (defcustom reb-re-syntax 'read
144 "*Syntax for the REs in the RE Builder. 149 "*Syntax for the REs in the RE Builder.
145 Can either be `read', `string' or `lisp-re'." 150 Can either be `read', `string', `sregex' or `lisp-re'."
146 :group 're-builder 151 :group 're-builder
147 :type '(choice (const :tag "Read syntax" read) 152 :type '(choice (const :tag "Read syntax" read)
148 (const :tag "String syntax" string) 153 (const :tag "String syntax" string)
149 (const :tag "`sregex' syntax" sregex) 154 (const :tag "`sregex' syntax" sregex)
150 (const :tag "`lisp-re' syntax" lisp-re) 155 (const :tag "`lisp-re' syntax" lisp-re)
151 (value: sring))) 156 (value: string)))
152 157
153 (defcustom reb-auto-match-limit 200 158 (defcustom reb-auto-match-limit 200
154 "*Positive integer limiting the matches for RE Builder auto updates. 159 "*Positive integer limiting the matches for RE Builder auto updates.
155 Set it to nil if you don't want limits here." 160 Set it to nil if you don't want limits here."
156 :group 're-builder 161 :group 're-builder