; * test/lisp/progmodes/cperl-mode-tests.el: add missing backslashes

diff --git a/test/lisp/progmodes/cperl-mode-tests.el b/test/lisp/progmodes/cperl-mode-tests.el
index 0ca985ae86e57dcc6cc27ec3c55dff6659a9a02a..211587cabacf6fd5fe0a3bc3db4dcba3300fbc58 100644 (file)
--- a/test/lisp/progmodes/cperl-mode-tests.el
+++ b/test/lisp/progmodes/cperl-mode-tests.el
@@ -233,7 +233,7 @@ attributes, prototypes and signatures."
                        'font-lock-constant-face)))
       ;; The signature
       (goto-char (point-min))
-      (search-forward-regexp "\\(\$top\\),\\(\$down\\)")
+      (search-forward-regexp "\\(\\$top\\),\\(\\$down\\)")
       (should (equal (get-text-property (match-beginning 1) 'face)
                      'font-lock-variable-name-face))
       (should (equal (get-text-property (match-beginning 1) 'face)