emacs-emojify

commit 8b5fe5a3068679cf96a54564bfed5bd48d438283
parent e0e06e6b227c0b5bb7cba8e5b3b724076165cddd
Author: Iqbal Ansari <iqbalansari02@yahoo.com>
Date:   Thu,  5 Nov 2015 23:28:20 +0530

Fix tests to work on atleast Emacs v24.3

Diffstat:
M
test/emojify-test.el
 | 
11
++++++++---

1 file changed, 8 insertions(+), 3 deletions(-)
diff --git a/test/emojify-test.el b/test/emojify-test.el
@@ -241,7 +241,10 @@
     (emojify-tests-should-be-emojified (line-beginning-position 2)))
 
   (emojify-tests-with-emojified-static-buffer "8)"
-    (org-mode)
+    ;; org-mode in Emacs v24.3 failed in read only buffers
+    ;; if first item was not a headline
+    (with-mock (stub org-set-startup-visibility => nil)
+               (org-mode))
     (emojify-redisplay-emojis)
     (emojify-tests-should-not-be-emojified (point-min)))
 
@@ -296,8 +299,10 @@
         (emojify-tests-should-be-emojified second-emoji-pos)
 
         (isearch-mode +1)
-        (isearch-printing-char ?b)
-        (isearch-printing-char ?o)
+        ;; isearch-printing-char in Emacs 24.3 did not accept
+        ;; any arguments
+        (let ((last-command-event ?b)) (isearch-printing-char))
+        (let ((last-command-event ?o)) (isearch-printing-char))
 
         ;; TODO: For some reason first one actually repeats backwards when
         ;; called non-interactively As such 2 more repeats are needed first to