mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-14 01:50:22 -08:00
Code Issues Projects Releases Wiki Activity

(rx): Work at compile time, not run time.

Browse source
This commit is contained in:
Eli Zaretskii 2004-03-27 11:52:07 +00:00
parent 2f9da07b59
commit 05ec033b10
2 changed files with 6 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/ChangeLog
View file

@ -1,5 +1,7 @@
2004-03-27 Dave Love <fx@gnu.org> 2004-03-27 Dave Love <fx@gnu.org>
* emacs-lisp/rx.el (rx): Work at compile time, not run time.
* strokes.el (strokes-global-set-stroke-string): New function. * strokes.el (strokes-global-set-stroke-string): New function.
(strokes-list-strokes): Cope with strings, not just commands. Set (strokes-list-strokes): Cope with strings, not just commands. Set
foreground colour of image. foreground colour of image.

6
lisp/emacs-lisp/rx.el
View file

@ -1,6 +1,6 @@
;;; rx.el --- sexp notation for regular expressions ;;; rx.el --- sexp notation for regular expressions
;; Copyright (C) 2001, 03, 2004 Free Software Foundation, Inc. ;; Copyright (C) 2001, 2003, 2004 Free Software Foundation, Inc.
;; Author: Gerd Moellmann <gerd@gnu.org> ;; Author: Gerd Moellmann <gerd@gnu.org>
;; Maintainer: FSF ;; Maintainer: FSF
@ -802,6 +802,9 @@ CHAR
`(backref N)' `(backref N)'
matches what was matched previously by submatch N. matches what was matched previously by submatch N.
`(backref N)'
matches what was matched previously by submatch N.
`(eval FORM)' `(eval FORM)'
evaluate FORM and insert result. If result is a string, evaluate FORM and insert result. If result is a string,
`regexp-quote' it. `regexp-quote' it.
@ -811,7 +814,6 @@ CHAR
(rx-to-string regexp)) (rx-to-string regexp))
(provide 'rx) (provide 'rx)
;;; arch-tag: 12d01a63-0008-42bb-ab8c-1c7d63be370b ;;; arch-tag: 12d01a63-0008-42bb-ab8c-1c7d63be370b