[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/lisp-mode.el [emacs-unico
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/lisp-mode.el [emacs-unicode-2] |
Date: |
Thu, 14 Oct 2004 05:16:21 -0400 |
Index: emacs/lisp/emacs-lisp/lisp-mode.el
diff -c emacs/lisp/emacs-lisp/lisp-mode.el:1.149.2.6
emacs/lisp/emacs-lisp/lisp-mode.el:1.149.2.7
*** emacs/lisp/emacs-lisp/lisp-mode.el:1.149.2.6 Thu Sep 9 09:36:32 2004
--- emacs/lisp/emacs-lisp/lisp-mode.el Thu Oct 14 08:50:01 2004
***************
*** 1,6 ****
;;; lisp-mode.el --- Lisp mode, and its idiosyncratic commands
! ;; Copyright (C) 1985,86,1999,2000,01,03,2004 Free Software Foundation, Inc.
;; Maintainer: FSF
;; Keywords: lisp, languages
--- 1,7 ----
;;; lisp-mode.el --- Lisp mode, and its idiosyncratic commands
! ;; Copyright (C) 1985, 1986, 1999, 2000, 2001, 2003, 2004
! ;; Free Software Foundation, Inc.
;; Maintainer: FSF
;; Keywords: lisp, languages
***************
*** 1153,1159 ****
and initial semicolons."
(interactive "P")
(or (fill-comment-paragraph justify)
! ;; Point is on a program line (a line no comment); we are interested
;; particularly in docstring lines.
;;
;; We bind `paragraph-start' and `paragraph-separate' temporarily. They
--- 1154,1161 ----
and initial semicolons."
(interactive "P")
(or (fill-comment-paragraph justify)
! ;; Since fill-comment-paragraph returned nil, that means we're not in
! ;; a comment: Point is on a program line; we are interested
;; particularly in docstring lines.
;;
;; We bind `paragraph-start' and `paragraph-separate' temporarily. They
***************
*** 1182,1188 ****
;; The `fill-column' is temporarily bound to
;; `emacs-lisp-docstring-fill-column' if that value is an integer.
(let ((paragraph-start (concat paragraph-start
! "\\|\\s-*\\([\(;:\"]\\|`\(\\)"))
(paragraph-separate
(concat paragraph-separate "\\|\\s-*\".*[,\\.]$"))
(fill-column (if (integerp emacs-lisp-docstring-fill-column)
--- 1184,1190 ----
;; The `fill-column' is temporarily bound to
;; `emacs-lisp-docstring-fill-column' if that value is an integer.
(let ((paragraph-start (concat paragraph-start
! "\\|\\s-*\\([(;:\"]\\|`(\\|#'(\\)"))
(paragraph-separate
(concat paragraph-separate "\\|\\s-*\".*[,\\.]$"))
(fill-column (if (integerp emacs-lisp-docstring-fill-column)
***************
*** 1227,1231 ****
(provide 'lisp-mode)
! ;;; arch-tag: 414c7f93-c245-4b77-8ed5-ed05ef7ff1bf
;;; lisp-mode.el ends here
--- 1229,1233 ----
(provide 'lisp-mode)
! ;; arch-tag: 414c7f93-c245-4b77-8ed5-ed05ef7ff1bf
;;; lisp-mode.el ends here
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/emacs-lisp/lisp-mode.el [emacs-unicode-2],
Miles Bader <=