From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 1 Apr 1997 22:17:59 +0000 (+0000)
Subject: (grep-null-device): Move before first use.
X-Git-Tag: emacs-20.1~2668
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=54bfce8a12c3c8cc19d8b84158ec008caa36820e;p=emacs.git

(grep-null-device): Move before first use.
---

diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index 77330d2b66b..096932eb5f0 100644
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -256,6 +256,9 @@ Otherwise, it saves all modified buffers without asking.")
   '(("^\\([a-zA-Z]?:?[^:( \t\n]+\\)[:( \t]+\\([0-9]+\\)[:) \t]" 1 2))
   "Regexp used to match grep hits.  See `compilation-error-regexp-alist'.")
 
+;; The system null device. (Should reference NULL_DEVICE from C.)
+(defvar grep-null-device "/dev/null" "The system null device.")
+
 ;; Use zgrep if available, to work nicely with compressed files.
 ;; Otherwise, use ordinary grep.
 (defvar grep-program
@@ -407,9 +410,6 @@ to a function that generates a unique name."
   (save-some-buffers (not compilation-ask-about-save) nil)
   (compile-internal compile-command "No more errors"))
 
-;; The system null device. (Should reference NULL_DEVICE from C.)
-(defvar grep-null-device "/dev/null" "The system null device.")
-
 (defun grep-process-setup ()
   "Set up `compilation-exit-message-function' for `grep'."
   (set (make-local-variable 'compilation-exit-message-function)