branch: externals/cm-mode
commit cb722b4d056f0511585c102ac0c27a9debaace1d
Author: Joost Kremers <[email protected]>
Commit: Joost Kremers <[email protected]>
Move follow-changes variables to follow-changes code.
---
cm-mode.el | 20 ++++++++++----------
1 file changed, 10 insertions(+), 10 deletions(-)
diff --git a/cm-mode.el b/cm-mode.el
index 19562942cb..22610563cb 100644
--- a/cm-mode.el
+++ b/cm-mode.el
@@ -94,16 +94,6 @@
(require 'thingatpt)
(require 'cl-lib)
-(defvar cm-follow-changes nil
- "Flag indicating whether follow changes mode is active.")
-(make-variable-buffer-local 'cm-follow-changes)
-
-(defvar cm-current-deletion nil
- "The deleted text in follow changes mode.
-The value is actually a list consisting of the text and a flag
-indicating whether the deletion was done with the backspace
-key.")
-
(defvar cm-addition-regexp
"\\(?:{\\+\\+\\(\\(?:[[:ascii:]]\\|[[:nonascii:]]\\)*?\\)\\+\\+}\\)"
"CriticMarkup addition regexp.")
@@ -329,6 +319,16 @@ This keymap contains only one binding: `C-c *', which is
bound to
;;; Follow Changes
+(defvar cm-follow-changes nil
+ "Flag indicating whether follow changes mode is active.")
+(make-variable-buffer-local 'cm-follow-changes)
+
+(defvar cm-current-deletion nil
+ "The deleted text in follow changes mode.
+The value is actually a list consisting of the text and a flag
+indicating whether the deletion was done with the backspace
+key.")
+
(defun cm-follow-changes (&optional arg)
"Activate follow changes mode.
If ARG is positive, activate follow changes mode, if ARG is 0 or