search

nlamirault / scame

An Emacs configuration
Other
5 stars 0 forks source link

helm unit test failed for key binding #34

Closed nlamirault closed 9 years ago

nlamirault commented 10 years ago

it seems key bindings for helm are not available in unit tests : 

;; FIXME
(ert-deftest test-scame-helm ()
  (require 'helm)
  (should (eql 'scame-helm-map
               (key-binding (kbd "C-x h"))))
      ;; (should (eql 'helm-find-files
      ;;              (key-binding (kbd "C-x h F"))))
  ;; (should (eql 'helm-for-files
  ;;              (key-binding (kbd "C-x h f"))))
  ;; (should (eql 'helm-M-x
  ;;              (key-binding (kbd "C-x h x"))))
  ;; (should (eql 'helm-show-kill-ring
  ;;              (key-binding (kbd "C-x h y"))))
  ;; (should (eql 'helm-buffers-list
  ;;              (key-binding (kbd "C-x h b")))))
  )

Test test-scame-helm condition:
    (ert-test-failed
     ((should
       (eql 'helm-find-files
             (key-binding ...)))
      :form
      (eql helm-find-files nil)
      :value nil))
   FAILED  24/54  test-scame-helm