Mercurial > emacs

changeset 50729:680d6365cfea

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(byte-compile-cl-warn): Use `string-match'.
author John Paul Wallington <jpw@pobox.com>
date Tue, 29 Apr 2003 02:53:39 +0000
parents 2acee3c76744
children 593e537d5449
files lisp/emacs-lisp/bytecomp.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/bytecomp.el	Mon Apr 28 22:05:17 2003 +0000
+++ b/lisp/emacs-lisp/bytecomp.el	Tue Apr 29 02:53:39 2003 +0000
@@ -10,7 +10,7 @@
 
 ;;; This version incorporates changes up to version 2.10 of the
 ;;; Zawinski-Furuseth compiler.
-(defconst byte-compile-version "$Revision: 2.130 $")
+(defconst byte-compile-version "$Revision: 2.131 $")
 
 ;; This file is part of GNU Emacs.
 
@@ -1272,7 +1272,7 @@
 	     ;; here than caaar and friends.
 	     (not (and (eq (get func 'byte-compile)
 			   'cl-byte-compile-compiler-macro)
-		       (match-string "\\`c[ad]+r\\'" (symbol-name func)))))
+		       (string-match "\\`c[ad]+r\\'" (symbol-name func)))))
 	(byte-compile-warn "Function `%s' from cl package called at runtime"
 			   func)))
   form)