Mercurial > emacs

changeset 24659:991a19a97565

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(hexlify-command): Apply shell-quote-argument after expanding hexl-program in case exec-directory contains a space. (dehexlify-command): Ditto.
author Andrew Innes <andrewi@gnu.org>
date Sun, 02 May 1999 09:38:50 +0000
parents 7de5cc79a8b4
children 809c3c8f6b77
files lisp/hexl.el
diffstat 1 files changed, 8 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/hexl.el	Sun May 02 09:36:07 1999 +0000
+++ b/lisp/hexl.el	Sun May 02 09:38:50 1999 +0000
@@ -77,13 +77,19 @@
   :group 'hexl)
 
 (defcustom hexlify-command
-  (format "%s%s %s" exec-directory hexl-program hexl-options)
+  (format "%s %s"
+	  (shell-quote-argument
+	   (expand-file-name hexl-program exec-directory))
+	  hexl-options)
   "The command to use to hexlify a buffer."
   :type 'string
   :group 'hexl)
 
 (defcustom dehexlify-command
-  (format "%s%s -de %s" exec-directory hexl-program hexl-options)
+  (format "%s -de %s"
+	  (shell-quote-argument
+	   (expand-file-name hexl-program exec-directory))
+	  hexl-options)
   "The command to use to unhexlify a buffer."
   :type 'string
   :group 'hexl)