another test for quick-look

jacktasia · Feb 24, 2016 · dc11e1c · dc11e1c
1 parent b3464a8
commit dc11e1c
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/test/dumb-jump-test.el b/test/dumb-jump-test.el
@@ -375,6 +375,12 @@
           (let ((result '(:path "src/file.js" :line 62 :context "var isNow = true" :diff 7 :target "isNow")))
             (dumb-jump-result-follow result))))
 
+(ert-deftest dumb-jump-message-result-follow-tooltip-test ()
+  (noflet ((popup-tip (s)
+                      (should (string= s "/file.js:62 var isNow = true"))))
+          (let ((result '(:path "src/file.js" :line 62 :context "var isNow = true" :diff 7 :target "isNow")))
+            (dumb-jump-result-follow result t "src"))))
+
 (ert-deftest dumb-jump-populate-regexes-test ()
   (should (equal (dumb-jump-populate-regexes "testvar" '("JJJ\\s*=\\s*")) '("testvar\\s*=\\s*")))
   (should (equal (dumb-jump-populate-regexes "$testvar" '("JJJ\\s*=\\s*")) '("\\$testvar\\s*=\\s*"))))