emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/evil-numbers af088b7107 107/145: Cleanup: < 80 chars, redu


From: ELPA Syncer
Subject: [nongnu] elpa/evil-numbers af088b7107 107/145: Cleanup: < 80 chars, reduce right shift
Date: Thu, 6 Jan 2022 03:00:22 -0500 (EST)

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

    Cleanup: < 80 chars, reduce right shift
---
 evil-numbers.el | 23 ++++++++++++++---------
 1 file changed, 14 insertions(+), 9 deletions(-)

diff --git a/evil-numbers.el b/evil-numbers.el
index c1763bbf64..15084fa1ea 100644
--- a/evil-numbers.el
+++ b/evil-numbers.el
@@ -74,20 +74,24 @@
    (cons ?- ?⁻)
    (cons
     (cons ?+ ?⁺)
-    (mapcar (lambda (i) (cons
-                         (string-to-char (number-to-string i))
-                         (aref "⁰¹²³⁴⁵⁶⁷⁸⁹" i)))
-            (number-sequence 0 9)))))
+    (mapcar
+     (lambda (i)
+       (cons
+        (string-to-char (number-to-string i))
+        (aref "⁰¹²³⁴⁵⁶⁷⁸⁹" i)))
+     (number-sequence 0 9)))))
 
 (defconst evil-numbers--subscript-alist
   (cons
    (cons ?- ?₋)
    (cons
     (cons ?+ ?₊)
-    (mapcar (lambda (i) (cons
-                         (string-to-char (number-to-string i))
-                         (aref "₀₁₂₃₄₅₆₇₈₉" i)))
-            (number-sequence 0 9)))))
+    (mapcar
+     (lambda (i)
+       (cons
+        (string-to-char (number-to-string i))
+        (aref "₀₁₂₃₄₅₆₇₈₉" i)))
+     (number-sequence 0 9)))))
 
 (defgroup evil-numbers nil
   "Support number increment/decrement."
@@ -361,7 +365,8 @@ note that searching still starts at POINT."
      ;; Skip format specifiers and interpret as boolean.
      (<= 0 (skip-chars-forward "bBoOxX" end))))))
 
-(defun evil-numbers--match-from-skip-chars (skip-chars dir limit do-check 
do-match)
+(defun evil-numbers--match-from-skip-chars
+    (skip-chars dir limit do-check do-match)
   "Match SKIP-CHARS in DIR (-1 or 1), until LIMIT.
 
 When DO-CHECK is non-nil, any failure to match returns nil.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]