branch: externals/shift-number
commit e895305dc139692a253b8de51c1e237e961583f5
Author: Campbell Barton <[email protected]>
Commit: Campbell Barton <[email protected]>
Cleanup: option to move the cursor
---
shift-number.el | 12 ++++++++++++
1 file changed, 12 insertions(+)
diff --git a/shift-number.el b/shift-number.el
index f275ac4c65..815c19fc58 100644
--- a/shift-number.el
+++ b/shift-number.el
@@ -27,6 +27,10 @@
;;; Code:
+
+;; ---------------------------------------------------------------------------
+;; Custom Variables
+
(defgroup shift-number nil
"Increase or decrease the number at point."
:group 'convenience)
@@ -46,6 +50,10 @@ The first parenthesized expression must match the number."
(declare-function apply-on-rectangle "rect")
+
+;; ---------------------------------------------------------------------------
+;; Private Functions
+
(defun shift-number--replace-in-region (str beg end)
"Utility to replace region from BEG to END with STR.
Return the region replaced."
@@ -245,6 +253,10 @@ REGION-BEG & REGION-END define the region."
(region-beginning)
(region-end))))
+
+;; ---------------------------------------------------------------------------
+;; Public Functions
+
;;;###autoload
(defun shift-number-up (&optional arg)
"Increase the number at point (or on the current line) by ARG."
