emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] master fc5c159 11/26: test-simple-run: make it a command.


From: Rocky Bernstein
Subject: [elpa] master fc5c159 11/26: test-simple-run: make it a command.
Date: Thu, 25 May 2017 02:22:14 -0400 (EDT)

branch: master
commit fc5c159010d7ecadd8b8e80a9b92fc46ad9d2b13
Author: rubikitch <address@hidden>
Commit: rubikitch <address@hidden>

    test-simple-run: make it a command.
---
 test-simple.el | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/test-simple.el b/test-simple.el
index 05a4e90..e257855 100644
--- a/test-simple.el
+++ b/test-simple.el
@@ -357,7 +357,14 @@ After calling this function, you can run test by key 
specified by `test-simple-r
 
 It is preferable to write at the first line of test files as a comment, e.g,
 ;;;; (test-simple-run \"emacs -batch -L %s -l %s\" (file-name-directory 
(locate-library \"test-simple.elc\")) buffer-file-name)
-"
+
+Calling this function interactively, COMMAND-LINE-FORMATS is set above."
+  (interactive)
+  (setq command-line-formats
+        (or command-line-formats
+            (list "emacs -batch -L %s -l %s"
+                  (file-name-directory (locate-library "test-simple.elc"))
+                  buffer-file-name)))
   (let ((func (lambda ()
                 (interactive)
                 (funcall test-simple-runner-interface



reply via email to

[Prev in Thread] Current Thread [Next in Thread]