(cvs-mode-find-file): Use forward-line rather than goto-line.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 1a739078fb8856722c8cfc94c46f3f3f192c5fd8..93372a90e4404edc91e6985d1598d7f19ce5df71 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,37 @@
+2009-09-10  Glenn Morris  <rgm@gnu.org>
+
+       * pcvs.el (cvs-mode-find-file): Use forward-line rather than goto-line.
+
+       * emacs-lisp/bytecomp.el (byte-compile-function-environment): Doc fix.
+       (byte-compile-file-form-autoload): Don't warn about unknown functions
+       where the autoload statement comes after the use.
+       (with-no-warnings): Give it a byte-hunk-handler like than of progn, so
+       that any handlers inside the body (eg require) are in turn respected.
+
+       * emacs-lisp/byte-opt.el (degrees-to-radians): Mark as free from side
+       effects.
+
+       * emacs-lisp/derived.el (define-derived-mode): Give the mode's map,
+       and syntax and abbrev tables basic docs, if they don't have any.
+
+       * emacs-lisp/easy-mmode.el (easy-mmode-defmap): Add doc-string.
+
+       * international/mule-cmds.el (top-level): Require cl when compiling.
+       (view-hello-file): Use default-value rather than
+       default-enable-multibyte-characters.
+
+       * progmodes/fortran.el: Move all safe and risky properties into the
+       defcustoms.
+
+       * mail/rmailedit.el, mail/rmailkwd.el, mail/rmailmm.el:
+       * mail/rmailmsc.el, mail/rmailsort.el, mail/rmailsum.el:
+       * mail/undigest.el:
+       Put autoloads in rmail.el rather than loaddefs.el.
+       * mail/rmail.el: Regenerate with extracted autoloads.
+
+       * mail/rmailsum.el (rmail-user-mail-address-regexp): Move to rmail.el.
+       * mail/rmail.el (rmail-user-mail-address-regexp): Move from rmailsum.el.
+
 2009-09-10  Nick Roberts  <nickrob@snap.net.nz>
 
        Reported in thread for Bug#4375.

diff --git a/lisp/pcvs.el b/lisp/pcvs.el
index dc01c45ad3f5783755bb382e4676492c7ba2d525..c184e22019cabd7866fa54a2741349ad4e9e9df1 100644 (file)
--- a/lisp/pcvs.el
+++ b/lisp/pcvs.el
@@ -2054,7 +2054,10 @@ With a prefix, opens the buffer in an OTHER window."
                          (t (if view 'view-buffer 'switch-to-buffer)))
                    buf)
           (when (and cvs-find-file-and-jump (cvs-applicable-p fi 'diff-base))
-            (goto-line (cvs-find-modif fi)))
+            (save-restriction
+              (widen)
+              (goto-char (point-min))
+              (forward-line (1- (cvs-find-modif fi)))))
           buf))))))