branch: externals/jarchive
commit f4a7953b4fb5e7c7b803f7827807a7b4b2cc0fe9
Author: dannyfreeman <[email protected]>
Commit: dannyfreeman <[email protected]>
reorganize testing code
---
jarchive.el | 11 ++++++-----
1 file changed, 6 insertions(+), 5 deletions(-)
diff --git a/jarchive.el b/jarchive.el
index dfb0f0340c..5f919dabe8 100644
--- a/jarchive.el
+++ b/jarchive.el
@@ -52,15 +52,16 @@ provided when calling OP."
(inhibit-file-name-operation op))
(apply op args)))))
-(defvar test-file
"/home/user/.m2/repository/hiccup/hiccup/1.0.5/hiccup-1.0.5.jar!/hiccup/page.clj")
-(defmacro comment (&rest body) nil)
+(defun jarchive-setup ()
+ (add-to-list 'file-name-handler-alist (cons jarchive--hybrid-path-regex
#'jarchive--file-name-handler)))
+;; Temporary, for testing
+(defmacro comment (&rest body) nil)
(comment
+ (jarchive-setup)
+ (defvar test-file
"/home/user/.m2/repository/hiccup/hiccup/1.0.5/hiccup-1.0.5.jar!/hiccup/page.clj")
(find-file test-file)
)
-(defun jarchive-setup ()
- (add-to-list 'file-name-handler-alist (cons jarchive--hybrid-path-regex
#'jarchive--file-name-handler)))
-
(provide 'jarchive)