From: Dan Nicolaescu Date: Sun, 9 Dec 2007 19:19:46 +0000 (+0000) Subject: * progmodes/perl-mode.el (perl-continued-statement-offset) X-Git-Tag: emacs-pretest-22.1.90~272 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2d5590e0a3357b155d0483316c1d8ac8aafb03db;p=emacs.git * progmodes/perl-mode.el (perl-continued-statement-offset) (perl-continued-brace-offset, perl-brace-offset) (perl-brace-imaginary-offset, perl-label-offset): * progmodes/cperl-mode.el (cperl-brace-offset) (cperl-continued-brace-offset, cperl-label-offset) (cperl-continued-statement-offset) (cperl-extra-newline-before-brace, cperl-merge-trailing-else): Add safe-local-variable properties. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 00f525ec533..13505897067 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,14 @@ +2007-12-09 Dan Nicolaescu + + * progmodes/perl-mode.el (perl-continued-statement-offset) + (perl-continued-brace-offset, perl-brace-offset) + (perl-brace-imaginary-offset, perl-label-offset): + * progmodes/cperl-mode.el (cperl-brace-offset) + (cperl-continued-brace-offset, cperl-label-offset) + (cperl-continued-statement-offset) + (cperl-extra-newline-before-brace, cperl-merge-trailing-else): Add + safe-local-variable properties. + 2007-12-08 Dan Nicolaescu * progmodes/verilog-mode.el (verilog-mode-map) @@ -5,6 +16,11 @@ (verilog-colorize-include-files): Use only overlay functions so that it can work on both emacs and XEmacs. (set-extent-keymap): Remove unused defun. + (verilog-kill-existing-comment, verilog-insert-date) + (verilog-insert-year): Rename in order not to pollute the global + namespace from kill-existing-comment, insert-date and + insert-year, respectively. + (verilog-set-auto-endcomments, verilog-header): Update callers. * files.el (auto-mode-alist): Recognize verilog files. diff --git a/lisp/progmodes/cperl-mode.el b/lisp/progmodes/cperl-mode.el index 4de1a845ab4..58781578a4e 100644 --- a/lisp/progmodes/cperl-mode.el +++ b/lisp/progmodes/cperl-mode.el @@ -234,12 +234,18 @@ for constructs with multiline if/unless/while/until/for/foreach condition." :type 'integer :group 'cperl-indentation-details) -;; Is is not unusual to put both perl-indent-level and +;; Is is not unusual to put both things like perl-indent-level and ;; cperl-indent-level in the local variable section of a file. If only ;; one of perl-mode and cperl-mode is in use, a warning will be issued -;; about the variable. Autoload this here, so that no warning is +;; about the variable. Autoload these here, so that no warning is ;; issued when using either perl-mode or cperl-mode. ;;;###autoload(put 'cperl-indent-level 'safe-local-variable 'integerp) +;;;###autoload(put 'cperl-brace-offset 'safe-local-variable 'integerp) +;;;###autoload(put 'cperl-continued-brace-offset 'safe-local-variable 'integerp) +;;;###autoload(put 'cperl-label-offset 'safe-local-variable 'integerp) +;;;###autoload(put 'cperl-continued-statement-offset 'safe-local-variable 'integerp) +;;;###autoload(put 'cperl-extra-newline-before-brace 'safe-local-variable 'booleanp) +;;;###autoload(put 'cperl-merge-trailing-else 'safe-local-variable 'booleanp) (defcustom cperl-lineup-step nil "*`cperl-lineup' will always lineup at multiple of this number. diff --git a/lisp/progmodes/perl-mode.el b/lisp/progmodes/perl-mode.el index ee14100f56d..0ccb643bc75 100644 --- a/lisp/progmodes/perl-mode.el +++ b/lisp/progmodes/perl-mode.el @@ -402,12 +402,17 @@ The expansion is entirely correct because it uses the C preprocessor." :type 'integer :group 'perl) -;; Is is not unusual to put both perl-indent-level and +;; Is is not unusual to put both things like perl-indent-level and ;; cperl-indent-level in the local variable section of a file. If only ;; one of perl-mode and cperl-mode is in use, a warning will be issued -;; about the variable. Autoload this here, so that no warning is +;; about the variable. Autoload these here, so that no warning is ;; issued when using either perl-mode or cperl-mode. ;;;###autoload(put 'perl-indent-level 'safe-local-variable 'integerp) +;;;###autoload(put 'perl-continued-statement-offset 'safe-local-variable 'integerp) +;;;###autoload(put 'perl-continued-brace-offset 'safe-local-variable 'integerp) +;;;###autoload(put 'perl-brace-offset 'safe-local-variable 'integerp) +;;;###autoload(put 'perl-brace-imaginary-offset 'safe-local-variable 'integerp) +;;;###autoload(put 'perl-label-offset 'safe-local-variable 'integerp) (defcustom perl-continued-statement-offset 4 "*Extra indent for lines not starting new statements."