From 1ca009f47fba725a77a1d809b7ef9bb40327722c Mon Sep 17 00:00:00 2001 From: Stefan Kangas Date: Thu, 26 Sep 2019 12:31:37 +0200 Subject: [PATCH] Declare unused vhdl code in align.el obsolete * lisp/align.el (align-vhdl-rules-list, align-set-vhdl-rules): Declare obsolete. (Bug#6207) (align-dq-string-modes, align-open-comment-modes): Move vhdl-mode to definition instead of adding it later. --- lisp/align.el | 12 ++++-------- 1 file changed, 4 insertions(+), 8 deletions(-) diff --git a/lisp/align.el b/lisp/align.el index cd72d52df4..52aecaefb4 100644 --- a/lisp/align.el +++ b/lisp/align.el @@ -206,7 +206,7 @@ align-text-modes (defcustom align-dq-string-modes (append align-lisp-modes align-c++-modes align-perl-modes - '(python-mode)) + '(python-mode 'vhdl-mode)) "A list of modes where double quoted strings should be excluded." :type '(repeat symbol) :group 'align) @@ -219,7 +219,7 @@ align-sq-string-modes (defcustom align-open-comment-modes (append align-lisp-modes align-c++-modes align-perl-modes - '(python-mode makefile-mode)) + '(python-mode makefile-mode vhdl-mode)) "A list of modes with a single-line comment syntax. These are comments as in Lisp, which have a beginning, but end with the line (i.e., `comment-end' is an empty string)." @@ -842,18 +842,14 @@ align-vhdl-rules-list "Alignment rules for `vhdl-mode'. See `align-rules-list' for more info." :type align-rules-list-type :group 'align) - (put 'align-vhdl-rules-list 'risky-local-variable t) +(make-obsolete-variable 'align-vhdl-rules-list "not used" "27.1") (defun align-set-vhdl-rules () "Setup the `align-mode-rules-list' variable for `vhdl-mode'." + (define (obsolete nil "27.1")) (setq align-mode-rules-list align-vhdl-rules-list)) -(add-hook 'vhdl-mode-hook 'align-set-vhdl-rules) - -(add-to-list 'align-dq-string-modes 'vhdl-mode) -(add-to-list 'align-open-comment-modes 'vhdl-mode) - ;;; User Functions: ;;;###autoload -- 2.20.1