* mel-g.el (gzip64-external-encoder): Change default value to

cause more recognizable error.
(gzip64-external-decoder): Ditto.

diff --git a/ChangeLog b/ChangeLog
index af55594..4448826 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2004-07-27  Yoichi NAKAYAMA  <yoichi@geiin.org>
+
+       * mel-g.el (gzip64-external-encoder): Change default value to
+       cause more recognizable error.
+       (gzip64-external-decoder): Ditto.
+
 2004-06-09  Yoichi NAKAYAMA  <yoichi@geiin.org>
 
        * std11.el (std11-parse-word-or-comment-or-period): Renamed from

diff --git a/mel-g.el b/mel-g.el
index 7f88e19..320af70 100644 (file)
--- a/mel-g.el
+++ b/mel-g.el
@@ -39,16 +39,10 @@
 ;;; @ variables
 ;;;
 
-(defvar gzip64-external-encoder
-  (let ((file (exec-installed-p "mmencode")))
-    (and file
-        (` ("sh" "-c" (, (concat "gzip -c | " file))))))
+(defvar gzip64-external-encoder '("sh" "-c" "gzip -c | mmencode")
   "*list of gzip64 encoder program name and its arguments.")
 
-(defvar gzip64-external-decoder
-  (let ((file (exec-installed-p "mmencode")))
-    (and file
-        (` ("sh" "-c" (, (concat file " -u | gzip -dc"))))))
+(defvar gzip64-external-decoder '("sh" "-c" "mmencode -u | gzip -dc")
   "*list of gzip64 decoder program name and its arguments.")