Skip to content

Commit

Permalink
Undercover a bunch more files
Browse files Browse the repository at this point in the history
  • Loading branch information
sachac committed Feb 18, 2015
1 parent 1093c79 commit 5edbdf5
Showing 1 changed file with 2 additions and 19 deletions.
21 changes: 2 additions & 19 deletions test/dotemacs_test.el
Original file line number Diff line number Diff line change
Expand Up @@ -58,25 +58,8 @@
(unless (package-installed-p 'undercover)
(package-install 'undercover))
(require 'undercover)
(undercover "ensime.el")

(defun undercover-file-handler (operation &rest args)
"Handle `load' OPERATION. Ignore all ARGS except first."
(if (eq 'load operation)
(let ((edebug-all-defs (undercover--coverage-enabled-p))
(load-file-name (file-truename (car args)))
(load-in-progress t))
(save-excursion
(message "Loading %s" load-file-name)
(eval-buffer (find-file load-file-name)))
(switch-to-buffer (current-buffer))
(push load-file-name undercover--files))
(let ((inhibit-file-name-handlers
(cons 'undercover-file-handler
(and (eq inhibit-file-name-operation operation)
inhibit-file-name-handlers)))
(inhibit-file-name-operation operation))
(apply operation args))))
(undercover "ensime.el" "ensime-utils.el" "ensime-vars.el" "ensime-config.el" "ensime-completion-util.el" "ensime-auto-complete"
"ensime-company.el" "ensime-inf.el" "ensime-editor.el")

(add-to-list 'load-path "./")
(require 'ensime)
Expand Down

0 comments on commit 5edbdf5

Please sign in to comment.