(bbdb-extract-field-value): Use `eword-decode-string' instead of

[elisp/tm.git] / methods / tmdecode

diff --git a/methods/tmdecode b/methods/tmdecode
index 4c4ac0b..2a09588 100755 (executable)
--- a/methods/tmdecode
+++ b/methods/tmdecode
@@ -1,25 +1,59 @@
-#!/bin/sh
+#!/bin/sh -
+#
+# $Id: tmdecode,v 4.1 1997/01/10 14:47:06 morioka Exp $
+#
+# Copyright 1994, 1995, 1996 Free Software Foundation, Inc.
+
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2, or (at your option)
+# any later version.
+# 
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+# 
+# You should have received a copy of the GNU General Public License
+# along with GNU Emacs; see the file COPYING.  If not, write to the
+# Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+# Boston, MA 02111-1307, USA.
+
+PATH=${PATH:-/usr/bin:/bin}:`dirname $0 2>/dev/null`; export PATH
+
+trap 'rm -f $2' 0 1 2 3 13 15
+
+case "$3" in
+/dev/stdout)
+       OUTPUT=
+       ;;
+*)
+       OUTPUT='> $3'
+       ;;
+esac
 
 case "$1" in
-"7bit"|"8bit"|"binary")
-       /bin/cp $2 $3
+""|"7bit"|"8bit"|"binary")
+       eval "cat $2 $OUTPUT"
        ;;
 "base64")
-       #decode-b < $2 > $3
-       mmencode -u $2 > $3
+       #eval "decode-b < $2 $OUTPUT"
+       eval "mmencode -u $2 $OUTPUT"
        ;;
 "quoted-printable")
-       mmencode -q -u $2 > $3
+       eval "mmencode -q -u $2 $OUTPUT"
        ;;
 "x-uue"|"x-uuencode")
        (cd $TM_TMP_DIR ; uudecode $2)
        ;;
+"x-gzip64")
+       #eval "decode-b < $2 | gzip -cd $OUTPUT"
+       eval "mmencode -u $2 | gzip -cd $OUTPUT"
+       ;;
 *)
        echo "unknown encoding"
        exit -1
        ;;
 esac
 
-/bin/rm $2
-
-echo "$2 was removed."
+# echo "$2 was removed."