changeset 112417:a2432c16dc9f

compile.el fix for bug#7812 * lisp/progmodes/compile.el (compilation-error-regexp-alist): Fix custom type.
author Glenn Morris <rgm@gnu.org>
date Thu, 20 Jan 2011 21:04:45 -0800
parents a3e090c3eecb
children 106bf56d370e
files lisp/ChangeLog lisp/progmodes/compile.el
diffstat 2 files changed, 7 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Mon Jan 17 18:31:59 2011 -0800
+++ b/lisp/ChangeLog	Thu Jan 20 21:04:45 2011 -0800
@@ -1,3 +1,8 @@
+2011-01-21  Glenn Morris  <rgm@gnu.org>
+
+	* progmodes/compile.el (compilation-error-regexp-alist):
+	Fix custom type.  (Bug#7812)
+
 2011-01-17  Stefan Monnier  <monnier@iro.umontreal.ca>
 
 	* emacs-lisp/easy-mmode.el (define-minor-mode): Don't re-evaluate the
@@ -12487,4 +12492,3 @@
 
   You should have received a copy of the GNU General Public License
   along with GNU Emacs.  If not, see <http://www.gnu.org/licenses/>.
-
--- a/lisp/progmodes/compile.el	Mon Jan 17 18:31:59 2011 -0800
+++ b/lisp/progmodes/compile.el	Thu Jan 20 21:04:45 2011 -0800
@@ -499,10 +499,8 @@
 
 Additional HIGHLIGHTs as described under `font-lock-keywords' can
 be added."
-  :type `(set :menu-tag "Pick"
-	      ,@(mapcar (lambda (elt)
-			  (list 'const (car elt)))
-			compilation-error-regexp-alist-alist))
+  :type '(repeat (choice (symbol :tag "Predefined symbol")
+			 (sexp :tag "Error specification")))
   :link `(file-link :tag "example file"
 		    ,(expand-file-name "compilation.txt" data-directory))
   :group 'compilation)
@@ -2389,5 +2387,4 @@
 
 (provide 'compile)
 
-;; arch-tag: 12465727-7382-4f72-b234-79855a00dd8c
 ;;; compile.el ends here