[elpa] externals/a68-mode 7a98164717 08/10: a68-mode.el: use ranges in skip-chars-backward

[ELPA Syncer]

branch: externals/a68-mode
commit 7a98164717ed59371b48e41e7dbaafb5dee95fd8
Author: Jose E. Marchesi <jose.march...@oracle.com>
Commit: Jose E. Marchesi <jose.march...@oracle.com>

    a68-mode.el: use ranges in skip-chars-backward
---
 a68-mode.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/a68-mode.el b/a68-mode.el
index d3c861818d..583a94d9a8 100644
--- a/a68-mode.el
+++ b/a68-mode.el
@@ -355,10 +355,10 @@
   (save-excursion
     (unless (or (a68-within-comment)
                 (a68-within-string))
-      (skip-chars-forward "ABCDEFGHIJKLMNOPQRSTUVWXYZ_")
+      (skip-chars-forward "A-Z_")
       (let* ((bold-tag-end (point))
              (bold-tag-begin (save-excursion
-                               (skip-chars-backward 
"ABCDEFGHIJKLMNOPQRSTUVWXYZ_")
+                               (skip-chars-backward "A-Z_")
                                (point))))
         (let ((replacedtext (downcase (buffer-substring bold-tag-begin 
bold-tag-end)))
               (overlay (make-overlay bold-tag-begin bold-tag-end)))