# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 822957608 0
# Node ID 29464b3d6188bebe8d397f8d0f8a15a6fce9f9f5
# Parent  20e489e1a0ef7c342079cc2bf450b1f613e60258
(vip-brac-function): Fix error format string.

diff -r 20e489e1a0ef -r 29464b3d6188 lisp/emulation/viper.el
--- a/lisp/emulation/viper.el	Mon Jan 29 23:19:49 1996 +0000
+++ b/lisp/emulation/viper.el	Mon Jan 29 23:20:08 1996 +0000
@@ -4831,8 +4831,7 @@
 	  ((vip-valid-register reg '(letter))
 	   (let* ((val (get-register (1+ (- reg ?a))))
 		  (buf (if (not val) 
-			   (error 
-			    (format vip-EmptyTextmarker reg))
+			   (error vip-EmptyTextmarker reg)
 			 (marker-buffer val)))
 		  (pos (marker-position val))
 		  line-no text (s pos) (e pos))