[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 [lexbind]
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/lisp-mode.el [lexbind] |
Date: |
Mon, 25 Oct 2004 00:46:15 -0400 |
Index: emacs/lisp/emacs-lisp/lisp-mode.el
diff -c emacs/lisp/emacs-lisp/lisp-mode.el:1.134.4.12
emacs/lisp/emacs-lisp/lisp-mode.el:1.134.4.13
*** emacs/lisp/emacs-lisp/lisp-mode.el:1.134.4.12 Thu Sep 16 00:12:21 2004
--- emacs/lisp/emacs-lisp/lisp-mode.el Mon Oct 25 04:19:40 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
***************
*** 1161,1167 ****
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
--- 1162,1169 ----
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
***************
*** 1190,1196 ****
;; 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)
--- 1192,1198 ----
;; 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)
***************
*** 1235,1239 ****
(provide 'lisp-mode)
! ;;; arch-tag: 414c7f93-c245-4b77-8ed5-ed05ef7ff1bf
;;; lisp-mode.el ends here
--- 1237,1241 ----
(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 [lexbind],
Miles Bader <=