[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[bongo-patches] Fix marker-related bug in `bongo-yank'
From: |
Daniel Brockman |
Subject: |
[bongo-patches] Fix marker-related bug in `bongo-yank' |
Date: |
Sat, 28 Apr 2007 01:58:37 +0200 |
User-agent: |
Gnus/5.11 (Gnus v5.11) Emacs/22.0.92 (gnu/linux) |
Fix marker-related bug in `bongo-yank'.
diff -rN -u old-bongo/bongo.el new-bongo/bongo.el
--- old-bongo/bongo.el 2007-04-28 01:58:35.000000000 +0200
+++ new-bongo/bongo.el 2007-04-28 01:58:35.000000000 +0200
@@ -8829,9 +8829,16 @@
(beginning-of-line)
(when line-move-ignore-invisible
(bongo-skip-invisible))
+ ;; This trick causes the yanked text to be inserted
+ ;; before all markers at the beginning of the line.
+ (insert-before-markers " ")
+ (backward-char 1)
(let ((yank-excluded-properties
(remq 'invisible yank-excluded-properties)))
(yank argument))
+ (save-excursion
+ (goto-char (region-end))
+ (delete-char 1))
(bongo-clean-up-after-insertion (region-beginning) (region-end))))
;; XXX: This definitely does not work properly.
--
Daniel Brockman <address@hidden>
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [bongo-patches] Fix marker-related bug in `bongo-yank',
Daniel Brockman <=
- Prev by Date:
[bongo-patches] Make `bongo-default-player-seek-by' deal with `bongo-player-elapsed-time' returning nil
- Next by Date:
[bongo-patches] Add immediate seek bindings: `F', `B', `M-F', `M-B', `C-M-F', `C-M-B'
- Previous by thread:
[bongo-patches] Make `bongo-default-player-seek-by' deal with `bongo-player-elapsed-time' returning nil
- Next by thread:
[bongo-patches] Add immediate seek bindings: `F', `B', `M-F', `M-B', `C-M-F', `C-M-B'
- Index(es):