*** empty log message ***

diff --git a/lisp/register.el b/lisp/register.el
index 3f12809db379f9410ebd7c393018dd4582ddf87f..599b5591176bc8769a2ca43814774a5d796ca880 100644 (file)
--- a/lisp/register.el
+++ b/lisp/register.el
@@ -105,7 +105,6 @@ REGISTER is a character."
            (if (consp val)
                (progn
                  (princ "the rectangle:\n")
-                 (setq val (cdr val))
                  (while val
                    (princ (car val))
                    (terpri)