Daniel Brockman <[EMAIL PROTECTED]> writes:
> I went ahead and installed some code for this.
>
> There are now two commands, `&' and `M-&', --- one which
> applies the p/r/m convention on tracks _and_ sections (`&'),
> and one which applies it only to tracks (`M-&').
Nice! The region versions do not work for me, though. I have to save the
positions before changing point.
In `bongo-universal-prefix/region/marking-object-command', like so:
(let ((marking bongo-marking)
(beg (region-beginning))
(end (region-end)))
(when marking
;; XXX: This discards the killed marking
;; as an unfortunate side-effect.
(bongo-kill-marking))
(goto-char beg)
(while (and (bongo-snap-to-object-line 'no-error)
(< (point) end))
And also in `bongo-universal-prefix/region/marking-track-command':
(let ((marking bongo-marking)
(beg (region-beginning))
(end (region-end)))
(when marking
;; XXX: This discards the killed marking
;; as an unfortunate side-effect.
(bongo-kill-marking))
(goto-char beg)
(while (and (or (bongo-track-line-p)
(goto-char (or (bongo-point-at-next-track-line)
(point-max))))
(< (point) end))
I haven't the time to do more testing right now, things are a little
chaotic down here.
_______________________________________________
bongo-devel mailing list
[email protected]
http://lists.nongnu.org/mailman/listinfo/bongo-devel
