From 3fde45afddbea0882666e04a1ad46da7ae17373c Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Mon, 22 Jun 2009 06:24:32 +0000 Subject: [PATCH] (lisp-indent-offset): Fix safe-local-variable property. (lisp-indent-function): Make it a defcustom. --- lisp/ChangeLog | 6 ++++++ lisp/emacs-lisp/lisp-mode.el | 8 +++++--- 2 files changed, 11 insertions(+), 3 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index c6d2e331cb3..6265733a15c 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2009-06-22 Glenn Morris + + * emacs-lisp/lisp-mode.el (lisp-indent-offset): Fix safe-local-variable + property. + (lisp-indent-function): Make it a defcustom. + 2009-06-21 Nick Roberts * progmodes/gdb-ui.el: Replace with ... diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el index ec97a00ab0c..9845d304c8f 100644 --- a/lisp/emacs-lisp/lisp-mode.el +++ b/lisp/emacs-lisp/lisp-mode.el @@ -877,15 +877,17 @@ which see." "If non-nil, indent second line of expressions that many more columns." :group 'lisp :type '(choice (const nil) integer)) -(put 'lisp-body-indent 'safe-local-variable +(put 'lisp-indent-offset 'safe-local-variable (lambda (x) (or (null x) (integerp x)))) -(defvar lisp-indent-function 'lisp-indent-function +(defcustom lisp-indent-function 'lisp-indent-function "A function to be called by `calculate-lisp-indent'. It indents the arguments of a Lisp function call. This function should accept two arguments: the indent-point, and the `parse-partial-sexp' state at that position. One option for this -function is `common-lisp-indent-function'.") +function is `common-lisp-indent-function'." + :type 'function + :group 'lisp) (defun lisp-indent-line (&optional whole-exp) "Indent current line as Lisp code. -- 2.39.2