Skip to content

Commit

Permalink
* align.el:
Browse files Browse the repository at this point in the history
* allout.el:
* apropos.el:
* arc-mode.el:
* autoinsert.el:
* avoid.el:
* battery.el:
* bookmark.el:
* buff-menu.el:
* calculator.el:
* chistory.el:
* cmuscheme.el:
* comint.el:
* compare-w.el:
* dabbrev.el:
* delim-col.el:
* desktop.el:
* diff-mode.el:
* diff.el:
* dired-aux.el:
* dired-x.el:
* dired.el:
* dos-vars.el:
* ediff-diff.el:
* ediff-help.el:
* ediff-init.el:
* ediff-merg.el:
* ediff-mult.el:
* ediff-ptch.el:
* ediff-vers.el:
* ediff-wind.el:
* ediff.el:
* emerge.el:
* facemenu.el:
* faces.el:
* ffap.el:
* filecache.el:
* find-dired.el:
* font-core.el:
* font-lock.el:
* forms.el:
* fringe.el:
* help-at-pt.el:
* hippie-exp.el:
* ido.el:
* image-file.el:
* imenu.el:
* indent.el:
* info.el:
* isearchb.el:
* iswitchb.el:
* jit-lock.el:
* jka-compr.el:
* log-edit.el:
* lpr.el:
* ls-lisp.el:
* man.el:
* menu-bar.el:
* midnight.el:
* mouse-sel.el:
* mouse.el:
* msb.el:
* outline.el:
* paren.el:
* pcmpl-cvs.el:
* pcmpl-gnu.el:
* pcomplete.el:
* pcvs-info.el:
* pcvs-parse.el:
* printing.el:
* ps-mule.el:
* ps-print.el:
* replace.el:
* ruler-mode.el:
* saveplace.el:
* sb-image.el:
* scroll-bar.el:
* sha1.el:
* shadowfile.el:
* shell.el:
* sort.el:
* speedbar.el:
* strokes.el:
* tempo.el:
* term.el:
* terminal.el:
* time-stamp.el:
* time.el:
* tree-widget.el:
* type-break.el:
* vc-cvs.el:
* vc-hg.el:
* vc-mcvs.el:
* vc-rcs.el:
* vc-sccs.el:
* vc.el:
* view.el:
* w32-vars.el:
* whitespace.el:
* wid-edit.el: Remove leading * from docstrings of defcustoms,
deffaces, defconsts and defuns.
  • Loading branch information
Lute Kamstra committed Dec 3, 2008
1 parent d1099bb commit 47ad7e2
Show file tree
Hide file tree
Showing 101 changed files with 988 additions and 884 deletions.
104 changes: 104 additions & 0 deletions lisp/ChangeLog
@@ -1,3 +1,107 @@
2008-12-03 Lute Kamstra <lute@gnu.org>

* align.el:
* allout.el:
* apropos.el:
* arc-mode.el:
* autoinsert.el:
* avoid.el:
* battery.el:
* bookmark.el:
* buff-menu.el:
* calculator.el:
* chistory.el:
* cmuscheme.el:
* comint.el:
* compare-w.el:
* dabbrev.el:
* delim-col.el:
* desktop.el:
* diff-mode.el:
* diff.el:
* dired-aux.el:
* dired-x.el:
* dired.el:
* dos-vars.el:
* ediff-diff.el:
* ediff-help.el:
* ediff-init.el:
* ediff-merg.el:
* ediff-mult.el:
* ediff-ptch.el:
* ediff-vers.el:
* ediff-wind.el:
* ediff.el:
* emerge.el:
* facemenu.el:
* faces.el:
* ffap.el:
* filecache.el:
* find-dired.el:
* font-core.el:
* font-lock.el:
* forms.el:
* fringe.el:
* help-at-pt.el:
* hippie-exp.el:
* ido.el:
* image-file.el:
* imenu.el:
* indent.el:
* info.el:
* isearchb.el:
* iswitchb.el:
* jit-lock.el:
* jka-compr.el:
* log-edit.el:
* lpr.el:
* ls-lisp.el:
* man.el:
* menu-bar.el:
* midnight.el:
* mouse-sel.el:
* mouse.el:
* msb.el:
* outline.el:
* paren.el:
* pcmpl-cvs.el:
* pcmpl-gnu.el:
* pcomplete.el:
* pcvs-info.el:
* pcvs-parse.el:
* printing.el:
* ps-mule.el:
* ps-print.el:
* replace.el:
* ruler-mode.el:
* saveplace.el:
* sb-image.el:
* scroll-bar.el:
* sha1.el:
* shadowfile.el:
* shell.el:
* sort.el:
* speedbar.el:
* strokes.el:
* tempo.el:
* term.el:
* terminal.el:
* time-stamp.el:
* time.el:
* tree-widget.el:
* type-break.el:
* vc-cvs.el:
* vc-hg.el:
* vc-mcvs.el:
* vc-rcs.el:
* vc-sccs.el:
* vc.el:
* view.el:
* w32-vars.el:
* whitespace.el:
* wid-edit.el: Remove leading * from docstrings of defcustoms,
deffaces, defconsts and defuns.

2008-12-02 Stefan Monnier <monnier@iro.umontreal.ca>

* complete.el (PC-do-completion): Fix leftover bug from Emacs-21 when
Expand Down
42 changes: 21 additions & 21 deletions lisp/align.el
Expand Up @@ -3,7 +3,7 @@
;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004,
;; 2005, 2006, 2007, 2008 Free Software Foundation, Inc.

;; Author: John Wiegley <johnw@gnu.org>
;; Author: John Wiegley <johnw@gnu.org>
;; Maintainer: FSF
;; Keywords: convenience languages lisp

Expand Down Expand Up @@ -127,17 +127,17 @@
;;; User Variables:

(defcustom align-load-hook nil
"*Hook that gets run after the aligner has been loaded."
"Hook that gets run after the aligner has been loaded."
:type 'hook
:group 'align)

(defcustom align-indent-before-aligning nil
"*If non-nil, indent the marked region before aligning it."
"If non-nil, indent the marked region before aligning it."
:type 'boolean
:group 'align)

(defcustom align-default-spacing 1
"*An integer that represents the default amount of padding to use.
"An integer that represents the default amount of padding to use.
If `align-to-tab-stop' is non-nil, this will represent the number of
tab stops to use for alignment, rather than the number of spaces.
Each alignment rule can optionally override both this variable. See
Expand All @@ -146,13 +146,13 @@ Each alignment rule can optionally override both this variable. See
:group 'align)

(defcustom align-to-tab-stop 'indent-tabs-mode
"*If non-nil, alignments will always fall on a tab boundary.
"If non-nil, alignments will always fall on a tab boundary.
It may also be a symbol, whose value will be taken."
:type '(choice (const nil) symbol)
:group 'align)

(defcustom align-region-heuristic 500
"*If non-nil, used as a heuristic by `align-current'.
"If non-nil, used as a heuristic by `align-current'.
Since each alignment rule can possibly have its own set of alignment
sections (whenever `align-region-separate' is non-nil, and not a
string), this heuristic is used to determine how far before and after
Expand All @@ -163,72 +163,72 @@ may cause unexpected behavior at times."
:group 'align)

(defcustom align-highlight-change-face 'highlight
"*The face to highlight with if changes are necessary."
"The face to highlight with if changes are necessary."
:type 'face
:group 'align)

(defcustom align-highlight-nochange-face 'secondary-selection
"*The face to highlight with if no changes are necessary."
"The face to highlight with if no changes are necessary."
:type 'face
:group 'align)

(defcustom align-large-region 10000
"*If an integer, defines what constitutes a \"large\" region.
"If an integer, defines what constitutes a \"large\" region.
If nil,then no messages will ever be printed to the minibuffer."
:type 'integer
:group 'align)

(defcustom align-c++-modes '(c++-mode c-mode java-mode)
"*A list of modes whose syntax resembles C/C++."
"A list of modes whose syntax resembles C/C++."
:type '(repeat symbol)
:group 'align)

(defcustom align-perl-modes '(perl-mode cperl-mode)
"*A list of modes where perl syntax is to be seen."
"A list of modes where perl syntax is to be seen."
:type '(repeat symbol)
:group 'align)

(defcustom align-lisp-modes
'(emacs-lisp-mode lisp-interaction-mode lisp-mode scheme-mode)
"*A list of modes whose syntax resembles Lisp."
"A list of modes whose syntax resembles Lisp."
:type '(repeat symbol)
:group 'align)

(defcustom align-tex-modes
'(tex-mode plain-tex-mode latex-mode slitex-mode)
"*A list of modes whose syntax resembles TeX (and family)."
"A list of modes whose syntax resembles TeX (and family)."
:type '(repeat symbol)
:group 'align)

(defcustom align-text-modes '(text-mode outline-mode)
"*A list of modes whose content is plain text."
"A list of modes whose content is plain text."
:type '(repeat symbol)
:group 'align)

(defcustom align-dq-string-modes
(append align-lisp-modes align-c++-modes align-perl-modes
'(python-mode))
"*A list of modes where double quoted strings should be excluded."
"A list of modes where double quoted strings should be excluded."
:type '(repeat symbol)
:group 'align)

(defcustom align-sq-string-modes
(append align-perl-modes '(python-mode))
"*A list of modes where single quoted strings should be excluded."
"A list of modes where single quoted strings should be excluded."
:type '(repeat symbol)
:group 'align)

(defcustom align-open-comment-modes
(append align-lisp-modes align-c++-modes align-perl-modes
'(python-mode makefile-mode))
"*A list of modes with a single-line comment syntax.
"A list of modes with a single-line comment syntax.
These are comments as in Lisp, which have a beginning but, end with
the line (i.e., `comment-end' is an empty string)."
:type '(repeat symbol)
:group 'align)

(defcustom align-region-separate "^\\s-*[{}]?\\s-*$"
"*Select the method by which alignment sections will be separated.
"Select the method by which alignment sections will be separated.
If this is a symbol, that symbol's value will be used.
For the sake of clarification, consider the following example, which
Expand Down Expand Up @@ -581,7 +581,7 @@ The possible settings for `align-region-separate' are:
(regexp . "^\\s-*\\w+:\\(\\s-*\\).*;")
(group . (1))
(modes . '(css-mode html-mode))))
"*A list describing all of the available alignment rules.
"A list describing all of the available alignment rules.
The format is:
((TITLE
Expand Down Expand Up @@ -779,7 +779,7 @@ The following attributes are meaningful:
(regexp . "^\\s-*#\\s-*\\(if\\w*\\|endif\\)\\(.*\\)$")
(group . 2)
(modes . align-c++-modes)))
"*A list describing text that should be excluded from alignment.
"A list describing text that should be excluded from alignment.
See the documentation for `align-rules-list' for more info."
:type align-exclude-rules-list-type
:group 'align)
Expand Down Expand Up @@ -837,7 +837,7 @@ See the variable `align-exclude-rules-list' for more details.")

(use-entity
(regexp . "\\(\\s-+\\)use\\s-+entity")))
"*Alignment rules for `vhdl-mode'. See `align-rules-list' for more info."
"Alignment rules for `vhdl-mode'. See `align-rules-list' for more info."
:type align-rules-list-type
:group 'align)

Expand Down

0 comments on commit 47ad7e2

Please sign in to comment.