[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master 56f6590 054/110: avy.el (avy-action-copy): Adjust for avy-
From: |
Oleh Krehel |
Subject: |
[elpa] master 56f6590 054/110: avy.el (avy-action-copy): Adjust for avy-goto-line |
Date: |
Sat, 11 May 2019 10:15:42 -0400 (EDT) |
branch: master
commit 56f6590c206d3cd42246520dabd600aad1aa9539
Author: Oleh Krehel <address@hidden>
Commit: Oleh Krehel <address@hidden>
avy.el (avy-action-copy): Adjust for avy-goto-line
Re #191
---
avy.el | 12 ++++++++----
1 file changed, 8 insertions(+), 4 deletions(-)
diff --git a/avy.el b/avy.el
index 8c3f6b2..dbacdca 100644
--- a/avy.el
+++ b/avy.el
@@ -627,20 +627,24 @@ Set `avy-style' according to COMMMAND as well."
(raise-frame frame)
(goto-char pt)))
+(defun avy-forward-item ()
+ (if (eq avy-command 'avy-goto-line)
+ (end-of-line)
+ (forward-sexp))
+ (point))
+
(defun avy-action-mark (pt)
"Mark sexp at PT."
(goto-char pt)
(set-mark (point))
- (forward-sexp))
+ (avy-forward-item))
(defun avy-action-copy (pt)
"Copy sexp starting on PT."
(save-excursion
(let (str)
(goto-char pt)
- (if (eq avy-command 'avy-goto-line)
- (end-of-line)
- (forward-sexp))
+ (avy-forward-item)
(setq str (buffer-substring pt (point)))
(kill-new str)
(message "Copied: %s" str)))
- [elpa] master 869261a 064/110: Display actual character that triggered an error, (continued)
- [elpa] master 869261a 064/110: Display actual character that triggered an error, Oleh Krehel, 2019/05/11
- [elpa] master 78392e6 058/110: avy.el (avy-action-teleport): Adjust for avy-goto-line, Oleh Krehel, 2019/05/11
- [elpa] master 7f83bbc 059/110: avy.el (avy-action-ispell): Adjust for avy-goto-line, Oleh Krehel, 2019/05/11
- [elpa] master a25b255 057/110: avy.el (avy-action-yank): Adjust for avy-goto-line, Oleh Krehel, 2019/05/11
- [elpa] master 631214d 060/110: Correct spelling mistake, Oleh Krehel, 2019/05/11
- [elpa] master ddf3c58 052/110: avy.el (avy-handler-default): Fix typo, Oleh Krehel, 2019/05/11
- [elpa] master a0ce6a7 050/110: Add avy-mouse-event-window and fix typo, Oleh Krehel, 2019/05/11
- [elpa] master 9489ca9 062/110: Add window selection via mouse button press and fix typo, Oleh Krehel, 2019/05/11
- [elpa] master 1b9f061 055/110: avy.el (avy-action-kill-stay): Adjust for avy-goto-line, Oleh Krehel, 2019/05/11
- [elpa] master dee0284 056/110: avy.el (avy-action-kill-move): Adjust for avy-goto-line, Oleh Krehel, 2019/05/11
- [elpa] master 56f6590 054/110: avy.el (avy-action-copy): Adjust for avy-goto-line,
Oleh Krehel <=
- [elpa] master c08fc7c 049/110: Add option to match newline in avy-goto-char-timer, Oleh Krehel, 2019/05/11
- [elpa] master 245b5d6 046/110: avy.el: Fix compile warnings, Oleh Krehel, 2019/05/11
- [elpa] master 0ed6408 043/110: avy.el: Fix checkdoc warnings, Oleh Krehel, 2019/05/11
- [elpa] master 36f768d 047/110: avy.el (avy-words): Specify custom type, Oleh Krehel, 2019/05/11
- [elpa] master 9103291 048/110: Update description to be easier to understand., Oleh Krehel, 2019/05/11
- [elpa] master f4c45d3 044/110: avy.el: Add org-mode commands for jumping to and refiling headings, Oleh Krehel, 2019/05/11
- [elpa] master 4af1993 053/110: avy.el (avy-read): Update avy-current-path before returning, Oleh Krehel, 2019/05/11
- [elpa] master 176f34f 051/110: avy.el (avy-handler-default): Error msg on mouse clicks, Oleh Krehel, 2019/05/11
- [elpa] master 8556274 045/110: avy.el (avy-org-goto-heading-timer): Simplify, Oleh Krehel, 2019/05/11
- [elpa] master 83859c3 040/110: avy.el: Add new avy-style to use words as sequences, Oleh Krehel, 2019/05/11