diff options
| author | Glenn Morris | 2010-11-08 23:47:01 -0800 |
|---|---|---|
| committer | Glenn Morris | 2010-11-08 23:47:01 -0800 |
| commit | 3406534cab44e5433ed13231c8a55da9da58d100 (patch) | |
| tree | 20fe8f54ba5b589f3c7219160675848e52ef4fa9 | |
| parent | 9b026d9f13d4a7694e9dfebce171564cf8ec2dd4 (diff) | |
| download | emacs-3406534cab44e5433ed13231c8a55da9da58d100.tar.gz emacs-3406534cab44e5433ed13231c8a55da9da58d100.zip | |
* lisp/progmodes/meta-mode.el: Remove leading `*' from defcustom docs.
| -rw-r--r-- | lisp/ChangeLog | 2 | ||||
| -rw-r--r-- | lisp/progmodes/meta-mode.el | 26 |
2 files changed, 15 insertions, 13 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 0d04dd14b5a..16beffe989e 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,5 +1,7 @@ | |||
| 1 | 2010-11-09 Glenn Morris <rgm@gnu.org> | 1 | 2010-11-09 Glenn Morris <rgm@gnu.org> |
| 2 | 2 | ||
| 3 | * progmodes/meta-mode.el: Remove leading `*' from defcustom docs. | ||
| 4 | |||
| 3 | * vc/emerge.el (emerge-line-number-in-buf): | 5 | * vc/emerge.el (emerge-line-number-in-buf): |
| 4 | * textmodes/ispell.el (ispell-region): | 6 | * textmodes/ispell.el (ispell-region): |
| 5 | * textmodes/fill.el (current-fill-column): | 7 | * textmodes/fill.el (current-fill-column): |
diff --git a/lisp/progmodes/meta-mode.el b/lisp/progmodes/meta-mode.el index 0011dd17f66..d40e0d77ef3 100644 --- a/lisp/progmodes/meta-mode.el +++ b/lisp/progmodes/meta-mode.el | |||
| @@ -517,24 +517,24 @@ If the list was changed, sort the list and remove duplicates first." | |||
| 517 | ;;; Indentation. | 517 | ;;; Indentation. |
| 518 | 518 | ||
| 519 | (defcustom meta-indent-level 2 | 519 | (defcustom meta-indent-level 2 |
| 520 | "*Indentation of begin-end blocks in Metafont or MetaPost mode." | 520 | "Indentation of begin-end blocks in Metafont or MetaPost mode." |
| 521 | :type 'integer | 521 | :type 'integer |
| 522 | :group 'meta-font) | 522 | :group 'meta-font) |
| 523 | 523 | ||
| 524 | 524 | ||
| 525 | (defcustom meta-left-comment-regexp "%%+" | 525 | (defcustom meta-left-comment-regexp "%%+" |
| 526 | "*Regexp matching comments that should be placed on the left margin." | 526 | "Regexp matching comments that should be placed on the left margin." |
| 527 | :type 'regexp | 527 | :type 'regexp |
| 528 | :group 'meta-font) | 528 | :group 'meta-font) |
| 529 | 529 | ||
| 530 | (defcustom meta-right-comment-regexp nil | 530 | (defcustom meta-right-comment-regexp nil |
| 531 | "*Regexp matching comments that should be placed to the right margin." | 531 | "Regexp matching comments that should be placed to the right margin." |
| 532 | :type '(choice regexp | 532 | :type '(choice regexp |
| 533 | (const :tag "None" nil)) | 533 | (const :tag "None" nil)) |
| 534 | :group 'meta-font) | 534 | :group 'meta-font) |
| 535 | 535 | ||
| 536 | (defcustom meta-ignore-comment-regexp "%[^%]" | 536 | (defcustom meta-ignore-comment-regexp "%[^%]" |
| 537 | "*Regexp matching comments that whose indentation should not be touched." | 537 | "Regexp matching comments that whose indentation should not be touched." |
| 538 | :type 'regexp | 538 | :type 'regexp |
| 539 | :group 'meta-font) | 539 | :group 'meta-font) |
| 540 | 540 | ||
| @@ -543,21 +543,21 @@ If the list was changed, sort the list and remove duplicates first." | |||
| 543 | (concat "\\(begin\\(char\\|fig\\|gr\\(aph\\|oup\\)\\|logochar\\)\\|" | 543 | (concat "\\(begin\\(char\\|fig\\|gr\\(aph\\|oup\\)\\|logochar\\)\\|" |
| 544 | "def\\|for\\(\\|ever\\|suffixes\\)\\|if\\|mode_def\\|" | 544 | "def\\|for\\(\\|ever\\|suffixes\\)\\|if\\|mode_def\\|" |
| 545 | "primarydef\\|secondarydef\\|tertiarydef\\|vardef\\)") | 545 | "primarydef\\|secondarydef\\|tertiarydef\\|vardef\\)") |
| 546 | "*Regexp matching the beginning of environments to be indented." | 546 | "Regexp matching the beginning of environments to be indented." |
| 547 | :type 'regexp | 547 | :type 'regexp |
| 548 | :group 'meta-font) | 548 | :group 'meta-font) |
| 549 | 549 | ||
| 550 | (defcustom meta-end-environment-regexp | 550 | (defcustom meta-end-environment-regexp |
| 551 | (concat "\\(end\\(char\\|def\\|f\\(ig\\|or\\)\\|gr\\(aph\\|oup\\)\\)" | 551 | (concat "\\(end\\(char\\|def\\|f\\(ig\\|or\\)\\|gr\\(aph\\|oup\\)\\)" |
| 552 | "\\|fi\\)") | 552 | "\\|fi\\)") |
| 553 | "*Regexp matching the end of environments to be indented." | 553 | "Regexp matching the end of environments to be indented." |
| 554 | :type 'regexp | 554 | :type 'regexp |
| 555 | :group 'meta-font) | 555 | :group 'meta-font) |
| 556 | 556 | ||
| 557 | (defcustom meta-within-environment-regexp | 557 | (defcustom meta-within-environment-regexp |
| 558 | ; (concat "\\(e\\(lse\\(\\|if\\)\\|xit\\(if\\|unless\\)\\)\\)") | 558 | ; (concat "\\(e\\(lse\\(\\|if\\)\\|xit\\(if\\|unless\\)\\)\\)") |
| 559 | (concat "\\(else\\(\\|if\\)\\)") | 559 | (concat "\\(else\\(\\|if\\)\\)") |
| 560 | "*Regexp matching keywords within environments not to be indented." | 560 | "Regexp matching keywords within environments not to be indented." |
| 561 | :type 'regexp | 561 | :type 'regexp |
| 562 | :group 'meta-font) | 562 | :group 'meta-font) |
| 563 | 563 | ||
| @@ -744,13 +744,13 @@ If the list was changed, sort the list and remove duplicates first." | |||
| 744 | (defcustom meta-begin-defun-regexp | 744 | (defcustom meta-begin-defun-regexp |
| 745 | (concat "\\(begin\\(char\\|fig\\|logochar\\)\\|def\\|mode_def\\|" | 745 | (concat "\\(begin\\(char\\|fig\\|logochar\\)\\|def\\|mode_def\\|" |
| 746 | "primarydef\\|secondarydef\\|tertiarydef\\|vardef\\)") | 746 | "primarydef\\|secondarydef\\|tertiarydef\\|vardef\\)") |
| 747 | "*Regexp matching beginning of defuns in Metafont or MetaPost mode." | 747 | "Regexp matching beginning of defuns in Metafont or MetaPost mode." |
| 748 | :type 'regexp | 748 | :type 'regexp |
| 749 | :group 'meta-font) | 749 | :group 'meta-font) |
| 750 | 750 | ||
| 751 | (defcustom meta-end-defun-regexp | 751 | (defcustom meta-end-defun-regexp |
| 752 | (concat "\\(end\\(char\\|def\\|fig\\)\\)") | 752 | (concat "\\(end\\(char\\|def\\|fig\\)\\)") |
| 753 | "*Regexp matching the end of defuns in Metafont or MetaPost mode." | 753 | "Regexp matching the end of defuns in Metafont or MetaPost mode." |
| 754 | :type 'regexp | 754 | :type 'regexp |
| 755 | :group 'meta-font) | 755 | :group 'meta-font) |
| 756 | 756 | ||
| @@ -955,21 +955,21 @@ The environment marked is the one that contains point or follows point." | |||
| 955 | ;;; Hook variables. | 955 | ;;; Hook variables. |
| 956 | 956 | ||
| 957 | (defcustom meta-mode-load-hook nil | 957 | (defcustom meta-mode-load-hook nil |
| 958 | "*Hook evaluated when first loading Metafont or MetaPost mode." | 958 | "Hook evaluated when first loading Metafont or MetaPost mode." |
| 959 | :type 'hook | 959 | :type 'hook |
| 960 | :group 'meta-font) | 960 | :group 'meta-font) |
| 961 | 961 | ||
| 962 | (defcustom meta-common-mode-hook nil | 962 | (defcustom meta-common-mode-hook nil |
| 963 | "*Hook evaluated by both `metafont-mode' and `metapost-mode'." | 963 | "Hook evaluated by both `metafont-mode' and `metapost-mode'." |
| 964 | :type 'hook | 964 | :type 'hook |
| 965 | :group 'meta-font) | 965 | :group 'meta-font) |
| 966 | 966 | ||
| 967 | (defcustom metafont-mode-hook nil | 967 | (defcustom metafont-mode-hook nil |
| 968 | "*Hook evaluated by `metafont-mode' after `meta-common-mode-hook'." | 968 | "Hook evaluated by `metafont-mode' after `meta-common-mode-hook'." |
| 969 | :type 'hook | 969 | :type 'hook |
| 970 | :group 'meta-font) | 970 | :group 'meta-font) |
| 971 | (defcustom metapost-mode-hook nil | 971 | (defcustom metapost-mode-hook nil |
| 972 | "*Hook evaluated by `metapost-mode' after `meta-common-mode-hook'." | 972 | "Hook evaluated by `metapost-mode' after `meta-common-mode-hook'." |
| 973 | :type 'hook | 973 | :type 'hook |
| 974 | :group 'meta-font) | 974 | :group 'meta-font) |
| 975 | 975 | ||