[nongnu] elpa/evil-numbers b88595d46b 112/145: Cleanup: reduce vertical space use

[ELPA Syncer]

branch: elpa/evil-numbers
commit b88595d46b577d56d2b801e8c56720fe83e9214c
Author: Campbell Barton <ideasma...@gmail.com>
Commit: Campbell Barton <ideasma...@gmail.com>

    Cleanup: reduce vertical space use
---
 evil-numbers.el | 20 +++++++-------------
 1 file changed, 7 insertions(+), 13 deletions(-)

diff --git a/evil-numbers.el b/evil-numbers.el
index 8dfffcfe96..87e7723706 100644
--- a/evil-numbers.el
+++ b/evil-numbers.el
@@ -343,8 +343,7 @@ Return non-nil on success, leaving the point at the end of 
the number."
       ("0"  .  1)
       ("bB" .  1)
       ("01" .  +))
-    1 ;; Sign group.
-    4 ;; Number group.
+    1 4 ;; Sign & number groups.
     amount 2 beg end padded
     #'identity #'identity)
 
@@ -355,20 +354,18 @@ Return non-nil on success, leaving the point at the end 
of the number."
       ("0"   .  1)
       ("oO"  .  1)
       ("0-7" .  +))
-    1 ;; Sign group.
-    4 ;; Number group.
+    1 4 ;; Sign & number groups.
     amount 8 beg end padded
     #'identity #'identity)
 
-   ;; Find hex literals.
+   ;; Find hex literals:
    ;; 0[xX][0-9a-fA-F]+, e.g. 0xBEEF or 0Xcafe
    (evil-numbers--inc-at-pt-impl-with-match-chars
     '(("+-"         . \?)
       ("0"          .  1)
       ("xX"         .  1)
       ("[:xdigit:]" .  +))
-    1 ;; Sign group.
-    4 ;; Number group.
+    1 4 ;; Sign & number groups.
     amount 16 beg end padded
     #'identity #'identity)
 
@@ -377,8 +374,7 @@ Return non-nil on success, leaving the point at the end of 
the number."
    (evil-numbers--inc-at-pt-impl-with-match-chars
     '(("+-"         . \?)
       ("0123456789" .  +))
-    1 ;; Sign group.
-    2 ;; Number group.
+    1 2 ;; Sign & number groups.
     amount 10 beg end padded
     #'identity #'identity)
 
@@ -386,8 +382,7 @@ Return non-nil on success, leaving the point at the end of 
the number."
    (evil-numbers--inc-at-pt-impl-with-match-chars
     `(("⁺⁻"                             . \?)
       (,evil-numbers--chars-superscript .  +))
-    1 ;; Sign group.
-    2 ;; Number group.
+    1 2 ;; Sign & number groups.
     amount 10 beg end padded
     #'evil-numbers--decode-super #'evil-numbers--encode-super)
 
@@ -395,8 +390,7 @@ Return non-nil on success, leaving the point at the end of 
the number."
    (evil-numbers--inc-at-pt-impl-with-match-chars
     `(("₊₋"                           . \?)
       (,evil-numbers--chars-subscript .  +))
-    1 ;; Sign group.
-    2 ;; Number group.
+    1 2 ;; Sign & number groups.
     amount 10 beg end padded
     #'evil-numbers--decode-sub #'evil-numbers--encode-sub)))