summaryrefslogtreecommitdiff
path: root/lisp/textmodes/sgml-mode.el
diff options
context:
space:
mode:
authorMiles Bader <miles@gnu.org>2007-02-26 23:03:45 +0000
committerMiles Bader <miles@gnu.org>2007-02-26 23:03:45 +0000
commita73d7753f965734247be482efa125da5235996da (patch)
tree56af26fb1a12a2c93c146aac923947968c4c9d76 /lisp/textmodes/sgml-mode.el
parent55a5664de23c07003d4d2584fc065619609500b6 (diff)
parentf6f3d0b9133d06b29523c7bc744130cddc5c8d6b (diff)
downloademacs-a73d7753f965734247be482efa125da5235996da.tar.gz
Merge from emacs--devo--0
Patches applied: * emacs--devo--0 (patch 638-652) - Update from CVS - Merge from gnus--rel--5.10 * gnus--rel--5.10 (patch 202) - Update from CVS Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-177
Diffstat (limited to 'lisp/textmodes/sgml-mode.el')
-rw-r--r--lisp/textmodes/sgml-mode.el7
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/textmodes/sgml-mode.el b/lisp/textmodes/sgml-mode.el
index b4ecc325e0d..0c4613202c3 100644
--- a/lisp/textmodes/sgml-mode.el
+++ b/lisp/textmodes/sgml-mode.el
@@ -918,9 +918,10 @@ and move to the line in the SGML document that caused it."
(or sgml-saved-validate-command
(concat sgml-validate-command
" "
- (let ((name (buffer-file-name)))
- (and name
- (file-name-nondirectory name))))))))
+ (shell-quote-argument
+ (let ((name (buffer-file-name)))
+ (and name
+ (file-name-nondirectory name)))))))))
(setq sgml-saved-validate-command command)
(save-some-buffers (not compilation-ask-about-save) nil)
(compilation-start command))