[bongo-devel] Re: Marks

[Daniel Jensen]

Daniel Brockman <address@hidden> 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.