emacs/clon-indent.el

   1 ;;; clon-indent.el --- cl-indent additions
   2
   3 ;; Copyright (C) 2010 Didier Verna
   4
   5 ;; Author:        Didier Verna <didier@lrde.epita.fr>
   6 ;; Maintainer:    Didier Verna <didier@lrde.epita.fr>
   7 ;; Created:       Wed Jul  2 14:09:17 2008
   8 ;; Last Revision: Sat Jun 12 18:06:53 2010
   9 ;; Keywords:      extensions, lisp, data
  10
  11
  12 ;; This file is part of Clon.
  13
  14 ;; Clon is free software; you can redistribute it and/or modify
  15 ;; it under the terms of the GNU General Public License version 3,
  16 ;; as published by the Free Software Foundation.
  17
  18 ;; Clon is distributed in the hope that it will be useful,
  19 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  20 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21 ;; GNU General Public License for more details.
  22
  23 ;; You should have received a copy of the GNU General Public License
  24 ;; along with this program; if not, write to the Free Software
  25 ;; Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  26
  27
  28 ;;; Commentary:
  29
  30 ;; Contents management by FCM version 0.1.
  31
  32
  33 ;;; Code:
  34
  35 (dolist (symbol '(select-keys remove-keys replace-keys
  36                   add-to
  37                   convert-value convert-environment
  38                   push-cmdline-option push-unknown-option
  39                   make-face))
  40   (put symbol 'common-lisp-indent-function 1))
  41
  42 (dolist (symbol '(with-winsize
  43                   stream-file-stream
  44                   make-internal-flag
  45                   make-internal-switch
  46                   make-internal-stropt
  47                   make-internal-lispobj
  48                   make-internal-path
  49                   make-internal-enum
  50                   make-internal-xswitch))
  51   (put symbol 'common-lisp-indent-function 2))
  52
  53 (dolist (symbol '(push-retrieved-option replace-in-keys))
  54   (put symbol 'common-lisp-indent-function 3))
  55
  56
  57 ;;; clon-indent.el ends here