diff options
Diffstat (limited to 'lisp/emacs-lisp/cl-indent.el')
| -rw-r--r-- | lisp/emacs-lisp/cl-indent.el | 18 |
1 files changed, 8 insertions, 10 deletions
diff --git a/lisp/emacs-lisp/cl-indent.el b/lisp/emacs-lisp/cl-indent.el index 537b16e6916..f063f92ee7a 100644 --- a/lisp/emacs-lisp/cl-indent.el +++ b/lisp/emacs-lisp/cl-indent.el @@ -1,12 +1,12 @@ ;;; cl-indent.el --- enhanced lisp-indent mode ;; Copyright (C) 1987 Free Software Foundation, Inc. -;; Written by Richard Mlynarik July 1987 + ;; Author: Richard Mlynark <mly@eddie.mit.edu> +;; Created: July 1987 ;; Maintainer: FSF ;; Keywords: lisp, tools - ;; This file is part of GNU Emacs. ;; GNU Emacs is free software; you can redistribute it and/or modify @@ -25,6 +25,12 @@ ;;; Commentary: +;; This package supplies a single entry point, common-lisp-indent-function, +;; which performs indentation in the preferred style for Common Lisp code. +;; To enable it: +;; +;; (setq lisp-indent-function 'common-lisp-indent-function) + ;;>> TODO ;; :foo ;; bar @@ -41,8 +47,6 @@ ;;; Code: -;;; Hairy lisp indentation. - (defvar lisp-indent-maximum-backtracking 3 "*Maximum depth to backtrack out from a sublist for structured indentation. If this variable is 0, no backtracking will occur and forms such as flet @@ -466,10 +470,4 @@ by `lisp-body-indent'.") ;(put 'with-condition-handler 'common-lisp-indent-function '((1 4 ((* 1))) (2 &body))) ;(put 'condition-case 'common-lisp-indent-function '((1 4) (* 2 ((0 1) (1 3) (2 &body))))) - -;;;; Turn it on. -;(setq lisp-indent-function 'common-lisp-indent-function) - -;; To disable this stuff, (setq lisp-indent-function 'lisp-indent-function) - ;;; cl-indent.el ends here |