summaryrefslogtreecommitdiff
path: root/test/pdf-info.ert
diff options
context:
space:
mode:
Diffstat (limited to 'test/pdf-info.ert')
-rw-r--r--test/pdf-info.ert12
1 files changed, 12 insertions, 0 deletions
diff --git a/test/pdf-info.ert b/test/pdf-info.ert
new file mode 100644
index 0000000..3f907cb
--- /dev/null
+++ b/test/pdf-info.ert
@@ -0,0 +1,12 @@
+
+;; This is a very basic test, which merely checks the basic
+;; functionality of the epdfinfo program.
+
+(require 'pdf-info)
+
+(ert-deftest pdf-info ()
+ (let* ((pdf (expand-file-name "test.pdf")))
+ (should-not (pdf-info-open pdf))
+ (should (= (pdf-info-number-of-pages pdf) 3))
+ (should (= (length (pdf-info-search-string "Hello" nil pdf)) 3))
+ (should (pdf-info-close pdf))))