# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 764300470 0
# Node ID e58207907f533122a91856deee89a21d911f193c
# Parent  eed1282ed6b050d4e380305a3e9eddbbc90742ab
(jump-to-register): Handle dead marker.

diff -r eed1282ed6b0 -r e58207907f53 lisp/register.el
--- 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))