Fix jumping via register.

* lisp/pdf-view.el (pdf-view-jump-to-register): Create entry, jump and store it.

1 files changed, 5 insertions, 3 deletions

diff --git a/lisp/pdf-view.el b/lisp/pdf-view.el
index 2e5e5c7..d1f7e8e 100644
--- a/lisp/pdf-view.el
+++ b/lisp/pdf-view.el
@@ -1362,10 +1362,12 @@ See also `point-to-register'."
                (local-variable-p 'register-alist))
            (characterp last-command-event)
            last-command-event))))
-  (when return-register
-    (pdf-view-position-to-register return-register))
   (pdf-view-with-register-alist
-    (jump-to-register register delete)))
+    (let ((return-pos (and return-register
+                           (pdf-view-registerv-make))))
+      (jump-to-register register delete)
+      (when return-register
+        (set-register return-register return-pos)))))
 
 (provide 'pdf-view)