comparison lisp/mel/mel-g.el @ 104:cf808b4c4290 r20-1b4

Import from CVS: tag r20-1b4
author cvs
date Mon, 13 Aug 2007 09:16:51 +0200
parents c0c698873ce1
children 360340f9fd5f
comparison
equal deleted inserted replaced
103:30eda07fe280 104:cf808b4c4290
7 ;;; Author: Shuhei KOBAYASHI <shuhei-k@jaist.ac.jp> 7 ;;; Author: Shuhei KOBAYASHI <shuhei-k@jaist.ac.jp>
8 ;;; modified by MORIOKA Tomohiko <morioka@jaist.ac.jp> 8 ;;; modified by MORIOKA Tomohiko <morioka@jaist.ac.jp>
9 ;;; Maintainer: Shuhei KOBAYASHI <shuhei-k@jaist.ac.jp> 9 ;;; Maintainer: Shuhei KOBAYASHI <shuhei-k@jaist.ac.jp>
10 ;;; Created: 1995/10/25 10 ;;; Created: 1995/10/25
11 ;;; Version: 11 ;;; Version:
12 ;;; $Id: mel-g.el,v 1.2 1996/12/28 21:02:56 steve Exp $ 12 ;;; $Id: mel-g.el,v 1.3 1997/03/04 02:29:46 steve Exp $
13 ;;; Keywords: MIME, base64, gzip 13 ;;; Keywords: MIME, base64, gzip
14 ;;; 14 ;;;
15 ;;; This file is not part of MEL (MIME Encoding Library) yet. 15 ;;; This file is not part of MEL (MIME Encoding Library) yet.
16 ;;; 16 ;;;
17 ;;; This program is free software; you can redistribute it and/or 17 ;;; This program is free software; you can redistribute it and/or
34 34
35 35
36 ;;; @ variables 36 ;;; @ variables
37 ;;; 37 ;;;
38 38
39 (defvar gzip64-external-encoder '("sh" "-c" "gzip -c | mmencode") 39 (defvar gzip64-external-encoder `("sh" "-c"
40 ,(concat
41 "gzip -c | "
42 (expand-file-name "mmencode"
43 exec-directory)))
40 "*list of gzip64 encoder program name and its arguments.") 44 "*list of gzip64 encoder program name and its arguments.")
41 45
42 (defvar gzip64-external-decoder '("sh" "-c" "mmencode -u | gzip -dc") 46 (defvar gzip64-external-decoder `("sh" "-c"
47 ,(concat
48 (expand-file-name "mmencode"
49 exec-directory)
50 " -u | gzip -dc"))
43 "*list of gzip64 decoder program name and its arguments.") 51 "*list of gzip64 decoder program name and its arguments.")
44 52
45 53
46 ;;; @ encoder/decoder for region 54 ;;; @ encoder/decoder for region
47 ;;; 55 ;;;