X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=mel-g.el;h=91088e8cde7923d158f3de953f7f192841a27f35;hb=6260b782ec94886678bc08ecf41d7fa91fa6c9c5;hp=aa8b9f3cf42e9663e3af2bc2dc60e17d3a8a99c4;hpb=28ba362026c6d0d816d994b1d771507bc2828ef2;p=elisp%2Fflim.git diff --git a/mel-g.el b/mel-g.el index aa8b9f3..91088e8 100644 --- a/mel-g.el +++ b/mel-g.el @@ -22,8 +22,8 @@ ;; You should have received a copy of the GNU General Public License ;; along with this program; see the file COPYING. If not, write to the -;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, -;; Boston, MA 02111-1307, USA. +;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, +;; Boston, MA 02110-1301, USA. ;;; Commentary: @@ -39,20 +39,12 @@ ;;; @ 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.") -(unless (and gzip64-external-encoder gzip64-external-decoder) - (error "Please install mmencode command.")) ;;; @ encoder/decoder for region ;;;