From: Andreas Schwab <schwab@linux-m68k.org>
Date: Thu, 30 Dec 2010 15:15:34 +0000 (+0100)
Subject: * lisp/emacs-lisp/rx.el (rx-syntax): Fix typo.
X-Git-Tag: emacs-pretest-24.0.90~104^2~618^2~1322^2~278^2~43
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8ee2dc5cffd4b79007058f28dbf8fb10f02e462a;p=emacs.git

* lisp/emacs-lisp/rx.el (rx-syntax): Fix typo.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e241a65ff50..7081edf4100 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2010-12-30  Andreas Schwab  <schwab@linux-m68k.org>
+
+	* emacs-lisp/rx.el (rx-syntax): Fix typo.
+
 2010-12-30  Tassilo Horn  <tassilo@member.fsf.org>
 
 	* doc-view.el (doc-view-toggle-display): Perform rassq-delete-all
diff --git a/lisp/emacs-lisp/rx.el b/lisp/emacs-lisp/rx.el
index b3b88c3ce4f..cb6756a7e0f 100644
--- a/lisp/emacs-lisp/rx.el
+++ b/lisp/emacs-lisp/rx.el
@@ -767,7 +767,7 @@ of all atomic regexps."
     (unless syntax
       ;; Try sregex compatibility.
       (cond
-       ((character sym) (setq syntax sym))
+       ((characterp sym) (setq syntax sym))
        ((symbolp sym)
         (let ((name (symbol-name sym)))
           (if (= 1 (length name))