From 3b83106d995fbc6acce89c6dc9b2dbba185712c1 Mon Sep 17 00:00:00 2001
From: Andreas Politz <politza@hochschule-trier.de>
Date: Thu, 9 Apr 2015 08:44:51 +0200
Subject: Added pdf-view tests.

---
 test/pdf-view.ert | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)
 create mode 100644 test/pdf-view.ert

diff --git a/test/pdf-view.ert b/test/pdf-view.ert
new file mode 100644
index 0000000..58f6be5
--- /dev/null
+++ b/test/pdf-view.ert
@@ -0,0 +1,19 @@
+;; -*- lexical-binding: t -*-
+
+(require 'pdf-view)
+(require 'ert)
+
+(ert-deftest pdf-view-handle-archived-file ()
+  :expected-result :failed
+  (skip-unless (executable-find "gzip"))
+  (let ((tramp-verbose 0)
+        (temp
+         (make-temp-file "pdf-test")))
+    (unwind-protect
+        (progn
+          (copy-file "test.pdf" temp t)
+          (call-process "gzip" nil nil nil temp)
+          (setq temp (concat temp ".gz"))
+          (should (numberp (pdf-info-number-of-pages temp)))))
+    (when (file-exists-p temp)
+      (delete-file temp))))
-- 
cgit v1.0