[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/cl-indent.el [emacs-unico
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/cl-indent.el [emacs-unicode-2] |
Date: |
Mon, 28 Jun 2004 04:52:20 -0400 |
Index: emacs/lisp/emacs-lisp/cl-indent.el
diff -c emacs/lisp/emacs-lisp/cl-indent.el:1.40.4.1
emacs/lisp/emacs-lisp/cl-indent.el:1.40.4.2
*** emacs/lisp/emacs-lisp/cl-indent.el:1.40.4.1 Fri Apr 16 12:50:13 2004
--- emacs/lisp/emacs-lisp/cl-indent.el Mon Jun 28 07:29:45 2004
***************
*** 216,223 ****
(cond ((string-match "\\`def"
function)
(setq tentative-defun t))
! ((string-match "\\`\\(with\\|do\\)-"
! function)
(setq method '(&lambda &body))))))
;; backwards compatibility. Bletch.
((eq method 'defun)
--- 216,227 ----
(cond ((string-match "\\`def"
function)
(setq tentative-defun t))
! ((string-match
! (eval-when-compile
! (concat "\\`\\("
! (regexp-opt '("with" "without" "do"))
! "\\)-"))
! function)
(setq method '(&lambda &body))))))
;; backwards compatibility. Bletch.
((eq method 'defun)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/emacs-lisp/cl-indent.el [emacs-unicode-2],
Miles Bader <=