changeset 6462:e58207907f53

(jump-to-register): Handle dead marker.
author Karl Heuer <kwzh@gnu.org>
date Tue, 22 Mar 1994 01:41:10 +0000
parents eed1282ed6b0
children 380e8fcde9a2
files lisp/register.el
diffstat 1 files changed, 2 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/register.el	Tue Mar 22 01:24:14 1994 +0000
+++ b/lisp/register.el	Tue Mar 22 01:41:10 1994 +0000
@@ -93,6 +93,8 @@
      ((window-configuration-p val)
       (set-window-configuration val))
      ((markerp val)
+      (or (marker-buffer val)
+	  (error "That register's buffer no longer exists"))
       (switch-to-buffer (marker-buffer val))
       (goto-char val))
      ((and (consp val) (eq (car val) 'file))