# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 897505855 0
# Node ID 76657a0a9c70e60394614d2f18c4e6a53f08e316
# Parent  b235f1b173f3a1adb6200d321ebf6fe5d09f4f83
(metamail-region): Don't use concat with
numeric arg.

diff -r b235f1b173f3 -r 76657a0a9c70 lisp/mail/metamail.el
--- a/lisp/mail/metamail.el	Wed Jun 10 19:00:39 1998 +0000
+++ b/lisp/mail/metamail.el	Wed Jun 10 19:10:55 1998 +0000
@@ -3,7 +3,7 @@
 ;; Copyright (C) 1993, 1996  Free Software Foundation, Inc.
 
 ;; Author: Masanobu UMEDA <umerin@mse.kyutech.ac.jp>
-;; Version: $Id: metamail.el,v 1.8 1997/07/25 05:59:39 rms Exp rms $
+;; Version: $Id: metamail.el,v 1.9 1998/05/20 00:56:03 rms Exp fx $
 ;; Keywords: mail, news, mime, multimedia
 
 ;; This file is part of GNU Emacs.
@@ -165,7 +165,7 @@
 	(buffer-read-only nil)
 	(metafile (make-temp-name "/tmp/metamail"))
 	(option-environment
-	 (list (concat "EMACS_VIEW_MODE=" 
+	 (list (format "EMACS_VIEW_MODE=%d" 
 		       (if (numberp viewmode) viewmode 1)))))
     (save-excursion
       ;; Gee!  Metamail does not ouput to stdout if input comes from