release: 1.3.107

[lilypond.git] / lilypond-mode.el

diff --git a/lilypond-mode.el b/lilypond-mode.el
index 5f570c77fd06d1743d234fc7e5d3828623c45619..6e3de95f4d0ccd3feae29ebe7f461fc6eb707240 100644 (file)
--- a/lilypond-mode.el
+++ b/lilypond-mode.el
@@ -110,6 +110,7 @@ in LilyPond-include-path."
 ;; variable instead of quering the user. 
 (defvar LilyPond-command-force nil)
 
+(defvar LilyPond-xdvi-command "xdvik")
 
 ;; This is the major configuration variable.
 (defcustom LilyPond-command-alist
@@ -121,7 +122,7 @@ in LilyPond-include-path."
     ("SmartView" . ("xdvi %d" . "LilyPond"))
     
     ;; refreshes when kicked USR1
-    ("View" . ("xdvik %d" . "LilyPond"))
+    ("View" . ((concat LilyPond-xdvi-command " %d") . "LilyPond"))
     )
 
   "AList of commands to execute on the current document.