Subject: bug#15322: VC log buffer scrolls itself

From: Glenn Morris <[email-masked]>
Date: Thu, 12 Sep 2013 15:30:04 -0400

Stefan Monnier wrote:

> And I think that makes sense.  It's natural to select a particular
> revision when running vc-print-log from (say) vc-annotate, but for
> a plain `C-x v l', the user just wants to see "the log" and presumably
> doesn't care about which revision happens to be current.
>
> IOW, I think we're trying too hard here.

*** lisp/vc/vc.el	2013-09-12 06:10:12 +0000
--- lisp/vc/vc.el	2013-09-12 19:28:04 +0000
***************
*** 2299,2305 ****
    (let* ((vc-fileset (vc-deduce-fileset t)) ;FIXME: Why t? --Stef
  	 (backend (car vc-fileset))
  	 (files (cadr vc-fileset))
! 	 (working-revision (or working-revision (vc-working-revision (car files)))))
      (vc-print-log-internal backend files working-revision nil limit)))
  
  ;;;###autoload
--- 2299,2306 ----
    (let* ((vc-fileset (vc-deduce-fileset t)) ;FIXME: Why t? --Stef
  	 (backend (car vc-fileset))
  	 (files (cadr vc-fileset))
! ;;	 (working-revision (or working-revision (vc-working-revision (car files))))
!          )
      (vc-print-log-internal backend files working-revision nil limit)))
  
  ;;;###autoload