# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 974891843 0
# Node ID b27d530cc1cef769792e4ea127111117b44fde53
# Parent  158687c6a102d9889cabd19ea20070adb9e6a566
(md5): Fix error call.

diff -r 158687c6a102 -r b27d530cc1ce lisp/md5.el
--- a/lisp/md5.el	Wed Nov 22 11:14:50 2000 +0000
+++ b/lisp/md5.el	Wed Nov 22 11:17:23 2000 +0000
@@ -70,8 +70,7 @@
 	  (unless (eq 0 (call-process-region (or start (point-min))
 					     (or end (point-max))
 					     md5-program nil out-buffer))
-	    (error "Running MD5 command %s failed"
-		   (cons md5-program md5-program-args)))))
+	    (error "Running `md5-program' failed"))))
       ;; The meaningful output is the first 32 characters.
       ;; Don't return the newline that follows them!
       (buffer-substring 1 33))))