mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-21 05:21:37 -07:00
Code Issues Projects Releases Wiki Activity

* lisp/progmodes/flymake.el (flymake-xml-program): New option.

Browse source 
(flymake-xml-init): Use it.
This commit is contained in:
Glenn Morris 2013-05-13 22:42:17 -04:00
parent 29efd4698b
commit 61aaeb01ce
2 changed files with 13 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/ChangeLog
View file

@ -1,5 +1,8 @@
2013-05-14 Glenn Morris <rgm@gnu.org>
* progmodes/flymake.el (flymake-xml-program): New option.
(flymake-xml-init): Use it.
* term/xterm.el: Provide a feature.
* term/sup-mouse.el: Move to obsolete/. Provide a feature.

11
lisp/progmodes/flymake.el
View file

@ -257,6 +257,13 @@ are the string substitutions (see `format')."
:version "23.1"
:group 'tools)
(defcustom flymake-xml-program
(if (executable-find "xmlstarlet") "xmlstarlet" "xml")
"Program to use for XML validation."
:type 'file
:group 'flymake
:version "24.4")
(defcustom flymake-allowed-file-name-masks
'(("\\.\\(?:c\\(?:pp\\|xx\\|\\+\\+\\)?\\|CC\\)\\'" flymake-simple-make-init)
("\\.xml\\'" flymake-xml-init)
@ -1852,7 +1859,9 @@ Use CREATE-TEMP-F for creating temp copy."
;;;; xml-specific init-cleanup routines
(defun flymake-xml-init ()
(list "xml" (list "val" (flymake-init-create-temp-buffer-copy 'flymake-create-temp-inplace))))
(list flymake-xml-program
(list "val" (flymake-init-create-temp-buffer-copy
'flymake-create-temp-inplace))))
(provide 'flymake)