diff options
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/vc/vc.el | 3 |
2 files changed, 7 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 2513f838b57..161e7be2ae0 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2013-10-25 Glenn Morris <rgm@gnu.org> | ||
| 2 | |||
| 3 | * vc/vc.el (vc-print-log): Don't use a working revision unless | ||
| 4 | one was explicitly specified. (Bug#15322) | ||
| 5 | |||
| 1 | 2013-10-25 Stefan Monnier <monnier@iro.umontreal.ca> | 6 | 2013-10-25 Stefan Monnier <monnier@iro.umontreal.ca> |
| 2 | 7 | ||
| 3 | * subr.el (add-to-list): Preserve return value in compiler-macro | 8 | * subr.el (add-to-list): Preserve return value in compiler-macro |
diff --git a/lisp/vc/vc.el b/lisp/vc/vc.el index 11cfeb403d4..39bea10dc15 100644 --- a/lisp/vc/vc.el +++ b/lisp/vc/vc.el | |||
| @@ -2302,7 +2302,8 @@ WORKING-REVISION and LIMIT." | |||
| 2302 | (let* ((vc-fileset (vc-deduce-fileset t)) ;FIXME: Why t? --Stef | 2302 | (let* ((vc-fileset (vc-deduce-fileset t)) ;FIXME: Why t? --Stef |
| 2303 | (backend (car vc-fileset)) | 2303 | (backend (car vc-fileset)) |
| 2304 | (files (cadr vc-fileset)) | 2304 | (files (cadr vc-fileset)) |
| 2305 | (working-revision (or working-revision (vc-working-revision (car files))))) | 2305 | ;; (working-revision (or working-revision (vc-working-revision (car files)))) |
| 2306 | ) | ||
| 2306 | (vc-print-log-internal backend files working-revision nil limit))) | 2307 | (vc-print-log-internal backend files working-revision nil limit))) |
| 2307 | 2308 | ||
| 2308 | ;;;###autoload | 2309 | ;;;###autoload |