[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/cl-indent.el [lexbind]

[Miles Bader]

Index: emacs/lisp/emacs-lisp/cl-indent.el
diff -c emacs/lisp/emacs-lisp/cl-indent.el:1.37.2.2 
emacs/lisp/emacs-lisp/cl-indent.el:1.37.2.3
*** emacs/lisp/emacs-lisp/cl-indent.el:1.37.2.2 Tue Oct 14 23:32:20 2003
--- emacs/lisp/emacs-lisp/cl-indent.el  Tue Jul  6 09:14:20 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)