~ubuntu-branches/debian/experimental/magithub/experimental

« back to all changes in this revision

Viewing changes to test/magithub-test.el

  • Committer: Package Import Robot
  • Author(s): Matteo F. Vescovi
  • Date: 2017-06-14 14:34:54 UTC
  • Revision ID: package-import@ubuntu.com-20170614143454-bnymlw3u1446h1p4
Tags: upstream-0.1.2+20170516.7fd7343
ImportĀ upstreamĀ versionĀ 0.1.2+20170516.7fd7343

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
;;; magithub-tests.el --- tests for Magithub
 
2
 
 
3
;; Copyright (C) 2016  Sean Allred
 
4
;;
 
5
;; License: GPLv3
 
6
 
 
7
;;; Code:
 
8
 
 
9
(require 'ert)
 
10
 
 
11
(defmacro magithub-test-cache-with-new-cache (plist &rest body)
 
12
  (declare (indent 1))
 
13
  `(let ((magithub-cache-class-refresh-seconds-alist ',plist)
 
14
         (magithub-cache--cache (make-hash-table)))
 
15
     ,@body))
 
16
 
 
17
(require 'magithub-cache)
 
18
(ert-deftest magithub-test-cache ()
 
19
  (magithub-test-cache-with-new-cache ((:test . 30))
 
20
    (should (equal t (magithub-cache :test t)))))
 
21
 
 
22
;;; magithub-test.el ends here