Re: gud-format-command concats integers

[David Kastrup]

>>>>> "RMS" == Richard Stallman <rms@gnu.org> writes:

 RMS> Does this replacement code fix it?
 RMS>    ((eq key ?l)
 RMS>     (setq subst (int-to-string
 RMS>                  (if insource
 RMS>                      (save-excursion
 RMS>                        (beginning-of-line)
 RMS>                        (save-restriction
 RMS>                          (widen)
 RMS>                          (1+ (count-lines 1 (point)))))
 RMS>                    (cdr frame)))))

I would place the (beginning-of-line) after the (widen) so that the
line count does not get wring in case that (beginning-of-line) moves
to the start of the narrowed region in the midst of a line.

Anyhow, since beginning-of-line is not guaranteed to move to the
beginning of the line (see its documentation), it would be better to
write

        (if insource
        (save-restriction (widen) (+ (count-lines 1 (point))
                                 (if (bolp) 1 0)))))


-- 
David Kastrup, Kriemhildstr. 15, 44793 Bochum
Email: David.Kastrup@t-online.de