Backslash cleanup in Elisp source files

[gnu-emacs] / lisp / progmodes / ada-mode.el

diff --git a/lisp/progmodes/ada-mode.el b/lisp/progmodes/ada-mode.el
index 452f3b99742ae1758acd505e6dc592a4d67ec682..529b691ee7961363dafc4c6eb6a798a503805e44 100644 (file)
--- a/lisp/progmodes/ada-mode.el
+++ b/lisp/progmodes/ada-mode.el
@@ -2682,7 +2682,7 @@ if INITIAL-POS is non-nil, moves point to INITIAL-POS before calculation."
         ;; "then" has to be included in the case of "select...then abort"
         ;; statements, since (goto-stmt-start) at the beginning of
         ;; the current function would leave the cursor on that position
-        ((looking-at "\\(\\(els\\)?if\\>\\)\\|then abort\\\>")
+        ((looking-at "\\(\\(els\\)?if\\>\\)\\|then abort\\>")
          (ada-get-indent-if orgpoint))
         ;;
         ((looking-at "case\\>")
@@ -5290,7 +5290,7 @@ for `ada-procedure-start-regexp'."
            (setq functype (buffer-substring (point)
                                             (progn
                                               (skip-chars-forward
-                                               "a-zA-Z0-9_\.")
+                                               "a-zA-Z0-9_.")
                                               (point))))))
       ;; look for next non WS
       (cond