X-Git-Url: https://code.delx.au/gnu-emacs-elpa/blobdiff_plain/740b7e6f0e7f3dbc7f40600dffccf131c46a3607..af721abd3ad489f98cc8f67ba15d4dc44d187a5d:/packages/ada-mode/gnat-inspect.el

diff --git a/packages/ada-mode/gnat-inspect.el b/packages/ada-mode/gnat-inspect.el
index 5fb2d4ba5..b7b839bd6 100644
--- a/packages/ada-mode/gnat-inspect.el
+++ b/packages/ada-mode/gnat-inspect.el
@@ -1,10 +1,9 @@
-;;; gnat-inspect.el --- minor-mode for navigating sources using the
-;;; AdaCore cross reference tool gnatinspect.
-;;;
-;;; gnatinspect supports Ada and any gcc language that supports the
-;;; -fdump-xref switch (which includes C, C++).
+;;; gnat-inspect.el --- Minor-mode for navigating sources using gnatinspect  -*- lexical-binding:t -*-
+
+;; gnatinspect supports Ada and any gcc language that supports the
+;; -fdump-xref switch (which includes C, C++).
 ;;
-;;; Copyright (C) 2013, 2014  Free Software Foundation, Inc.
+;; Copyright (C) 2013-2015  Free Software Foundation, Inc.
 
 ;; Author: Stephen Leake <stephen_leake@member.fsf.org>
 ;; Maintainer: Stephen Leake <stephen_leake@member.fsf.org>
@@ -215,7 +214,7 @@ set compilation-mode with compilation-error-regexp-alist set to COMP-ERR."
       (setq result-count (- (line-number-at-pos) 1))
       (if (fboundp 'font-lock-ensure)
           (font-lock-ensure)
-        (font-lock-fontify-buffer))
+        (with-no-warnings (font-lock-fontify-buffer)))
       ;; font-lock-fontify-buffer applies compilation-message text properties
       ;; NOTE: Won't be needed in 24.5 any more, since compilation-next-error
       ;; will apply compilation-message text properties on the fly.