Insert buffer-file-name as PATTERN if pdf-view-mode is active

- checks if pdf-view-mode is active
- if it's active it inserts the file name of the currently loaded pdf as PATTERN

Author: fapdash

pdfgrep.el

@@ -61,12 +61,18 @@ Not including `pdfgrep-ignore-case'."
 
 (defun pdfgrep-default-command ()
   "Compute the default pdfgrep command for `pdfgrep'."
-  (let ((cmd (concat pdfgrep-program pdfgrep-options
-		     (when pdfgrep-ignore-case
-		       "-i "))))
-    (if pdfgrep-ignore-errors
-	(cons (concat cmd " 2>/dev/null") (1+ (length cmd)))
-      cmd)))
+  (let* ((cmd (concat pdfgrep-program pdfgrep-options
+		              (when pdfgrep-ignore-case
+		                "-i ")))
+         (cmd-ignore-errors (if pdfgrep-ignore-errors
+	                            (cons (concat cmd " 2>/dev/null") (1+ (length cmd)))
+                              nil)))
+    (cond ((and (equal major-mode 'pdf-view-mode) cmd-ignore-errors)
+           (cons (concat (car cmd-ignore-errors) " " buffer-file-name) (cdr cmd-ignore-errors)))
+          ((equal major-mode 'pdf-view-mode)
+           (cons (concat cmd " " buffer-file-name) (1+ (length cmd))))
+          (pdfgrep-ignore-errors cmd-ignore-errors)
+          (t cmd))))
 
 (defun pdfgrep (command-args)
   "Run pdfgrep with user-specified COMMAND-ARGS, collect output in a buffer.