(font-lock-defaults): Add defvar.

(buffer-file-type): Add defvar.

1 files changed, 12 insertions, 0 deletions

diff --git a/lisp/subr.el b/lisp/subr.el
index 427189f64a2..261a7b670d9 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -826,6 +826,18 @@ If MESSAGE is nil, instructions to type EXIT-CHAR are displayed there."
 
 ;;;; Miscellanea.
 
+;; A number of major modes set this locally.
+;; Give it a global value to avoid compiler warnings.
+(defvar font-lock-defaults nil)
+
+;; Avoid compiler warnings about this variable,
+;; which has a special meaning on certain system types.
+(defvar buffer-file-type nil
+  "Non-nil if the visited file is a binary file.
+This variable is meaningful on MS-DOG and Windows NT.
+On those systems, it is automatically local in every buffer.
+On other systems, this variable is normally always nil.")
+
 (defun ignore (&rest ignore)
   "Do nothing and return nil.
 This function accepts any number of arguments, but ignores them."