[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/objed ee24332 4/9: Fix resetting settings when buffer i
From: |
Clemens Radermacher |
Subject: |
[elpa] externals/objed ee24332 4/9: Fix resetting settings when buffer is not live anymore |
Date: |
Mon, 4 Mar 2019 07:46:22 -0500 (EST) |
branch: externals/objed
commit ee24332faf41f317651b8ce69bf92f8e65a10455
Author: Clemens Radermacher <address@hidden>
Commit: Clemens Radermacher <address@hidden>
Fix resetting settings when buffer is not live anymore
---
objed.el | 65 +++++++++++++++++++++++++++++++++-------------------------------
1 file changed, 34 insertions(+), 31 deletions(-)
diff --git a/objed.el b/objed.el
index c6d61b3..205be66 100644
--- a/objed.el
+++ b/objed.el
@@ -519,6 +519,7 @@ update to given object."
(objed--init name))
;; goto next on repeat
(cond ((eq name current)
+ (setq this-command 'objed-goto-next)
(objed--goto-next))
(t (when (objed--switch-to name)
(goto-char (objed--beg))))))))))
@@ -3095,47 +3096,49 @@ on."
(defun objed--reset ()
"Reset variables and state information."
(when objed--buffer
- (with-current-buffer objed--buffer
-
- (setq objed--opoint nil)
- (setq objed--electric-event nil)
+ ;; rest object as well
+ (setq objed--object nil)
+ (setq objed--opoint nil)
+ (setq objed--electric-event nil)
- (when objed--marked-ovs
- (dolist (ov objed--marked-ovs)
- (delete-overlay ov))
- (setq objed--marked-ovs nil))
+ (when objed--marked-ovs
+ (dolist (ov objed--marked-ovs)
+ (delete-overlay ov))
+ (setq objed--marked-ovs nil))
- (when objed--extend-cookie
- (face-remap-remove-relative
- objed--extend-cookie)
- (setq objed--extend-cookie nil))
+ (when objed--extend-cookie
+ (face-remap-remove-relative
+ objed--extend-cookie)
+ (setq objed--extend-cookie nil))
- (while objed--saved-vars
- (let ((setting (pop objed--saved-vars)))
- (if (consp setting)
- (set (car setting) (cdr setting))
- (kill-local-variable setting))))
+ (when objed--saved-cursor
+ (set-cursor-color objed--saved-cursor))
- (when objed--saved-cursor
- (set-cursor-color objed--saved-cursor))
+ (when objed--hl-cookie
+ (face-remap-remove-relative objed--hl-cookie))
- (when objed--hl-cookie
- (face-remap-remove-relative objed--hl-cookie))
+ (when objed-modeline-hint-p
+ (funcall objed-modeline-setup-func objed-mode-line-format 'reset))
- (when objed-modeline-hint-p
- (funcall objed-modeline-setup-func objed-mode-line-format 'reset))
+ (unless objed--hl-line-keep-p
+ (hl-line-mode -1))
- (unless objed--hl-line-keep-p
- (hl-line-mode -1))
+ (when (> (length objed--last-states) objed-states-max)
+ (setq objed--last-states
+ (cl-subseq objed--last-states 0 objed-states-max)))
- (when (> (length objed--last-states) objed-states-max)
- (setq objed--last-states
- (cl-subseq objed--last-states 0 objed-states-max)))
+ (when (buffer-live-p objed--buffer)
+ (with-current-buffer objed--buffer
+ (while objed--saved-vars
+ (let ((setting (pop objed--saved-vars)))
+ (if (consp setting)
+ (set (car setting) (cdr setting))
+ (kill-local-variable setting))))
+ (remove-hook 'pre-command-hook 'objed--push-state t)))
- (setq objed--block-p nil)
- (remove-hook 'pre-command-hook 'objed--push-state t)
- (setq objed--buffer nil))))
+ (setq objed--block-p nil)
+ (setq objed--buffer nil)))
- [elpa] externals/objed updated (65d3430 -> 98a3a35), Clemens Radermacher, 2019/03/04
- [elpa] externals/objed 5dd9ed0 1/9: Make C-x C-key actions available via x prefix, Clemens Radermacher, 2019/03/04
- [elpa] externals/objed 0e18666 3/9: Activate on recenter, Clemens Radermacher, 2019/03/04
- [elpa] externals/objed 77f2b75 8/9: Add more window control commands to op map, Clemens Radermacher, 2019/03/04
- [elpa] externals/objed 11e056c 6/9: Move more setting into buffer reset, Clemens Radermacher, 2019/03/04
- [elpa] externals/objed 59515c7 5/9: Don't skip ws when toggling sides, Clemens Radermacher, 2019/03/04
- [elpa] externals/objed e6d2de7 2/9: Improve beg/eof block, Clemens Radermacher, 2019/03/04
- [elpa] externals/objed f5876e9 7/9: Make buffer switch possible with objed staying active (other-window), Clemens Radermacher, 2019/03/04
- [elpa] externals/objed ee24332 4/9: Fix resetting settings when buffer is not live anymore,
Clemens Radermacher <=
- [elpa] externals/objed 98a3a35 9/9: Vesion bump, Clemens Radermacher, 2019/03/04