diff options
| author | Stefan Monnier | 2013-08-28 15:26:18 -0400 |
|---|---|---|
| committer | Stefan Monnier | 2013-08-28 15:26:18 -0400 |
| commit | 4021d6a62a0c19fa025955d06202588ec494d90f (patch) | |
| tree | ab1b1f6cdcb12e767103a0d60c12e0aa65b93348 | |
| parent | 3ec7babc5c774d9a24dbe68951091eb2bab08e60 (diff) | |
| download | emacs-4021d6a62a0c19fa025955d06202588ec494d90f.tar.gz emacs-4021d6a62a0c19fa025955d06202588ec494d90f.zip | |
* lisp/vc/smerge-mode.el: Remove redundant :group args.
| -rw-r--r-- | lisp/ChangeLog | 2 | ||||
| -rw-r--r-- | lisp/vc/smerge-mode.el | 21 |
2 files changed, 7 insertions, 16 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 712ec6c12b0..d7cb5532c5e 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,5 +1,7 @@ | |||
| 1 | 2013-08-28 Stefan Monnier <monnier@iro.umontreal.ca> | 1 | 2013-08-28 Stefan Monnier <monnier@iro.umontreal.ca> |
| 2 | 2 | ||
| 3 | * vc/smerge-mode.el: Remove redundant :group args. | ||
| 4 | |||
| 3 | * emacs-lisp/package.el (package-activate-1): Don't add unnecessarily | 5 | * emacs-lisp/package.el (package-activate-1): Don't add unnecessarily |
| 4 | to load-path. | 6 | to load-path. |
| 5 | 7 | ||
diff --git a/lisp/vc/smerge-mode.el b/lisp/vc/smerge-mode.el index f61e97216a9..87336b6a357 100644 --- a/lisp/vc/smerge-mode.el +++ b/lisp/vc/smerge-mode.el | |||
| @@ -57,7 +57,6 @@ | |||
| 57 | 57 | ||
| 58 | (defcustom smerge-diff-buffer-name "*vc-diff*" | 58 | (defcustom smerge-diff-buffer-name "*vc-diff*" |
| 59 | "Buffer name to use for displaying diffs." | 59 | "Buffer name to use for displaying diffs." |
| 60 | :group 'smerge | ||
| 61 | :type '(choice | 60 | :type '(choice |
| 62 | (const "*vc-diff*") | 61 | (const "*vc-diff*") |
| 63 | (const "*cvs-diff*") | 62 | (const "*cvs-diff*") |
| @@ -69,12 +68,10 @@ | |||
| 69 | (if (listp diff-switches) diff-switches (list diff-switches))) | 68 | (if (listp diff-switches) diff-switches (list diff-switches))) |
| 70 | "A list of strings specifying switches to be passed to diff. | 69 | "A list of strings specifying switches to be passed to diff. |
| 71 | Used in `smerge-diff-base-mine' and related functions." | 70 | Used in `smerge-diff-base-mine' and related functions." |
| 72 | :group 'smerge | ||
| 73 | :type '(repeat string)) | 71 | :type '(repeat string)) |
| 74 | 72 | ||
| 75 | (defcustom smerge-auto-leave t | 73 | (defcustom smerge-auto-leave t |
| 76 | "Non-nil means to leave `smerge-mode' when the last conflict is resolved." | 74 | "Non-nil means to leave `smerge-mode' when the last conflict is resolved." |
| 77 | :group 'smerge | ||
| 78 | :type 'boolean) | 75 | :type 'boolean) |
| 79 | 76 | ||
| 80 | (defface smerge-mine | 77 | (defface smerge-mine |
| @@ -84,8 +81,7 @@ Used in `smerge-diff-base-mine' and related functions." | |||
| 84 | :background "#553333") | 81 | :background "#553333") |
| 85 | (((class color)) | 82 | (((class color)) |
| 86 | :foreground "red")) | 83 | :foreground "red")) |
| 87 | "Face for your code." | 84 | "Face for your code.") |
| 88 | :group 'smerge) | ||
| 89 | (define-obsolete-face-alias 'smerge-mine-face 'smerge-mine "22.1") | 85 | (define-obsolete-face-alias 'smerge-mine-face 'smerge-mine "22.1") |
| 90 | (defvar smerge-mine-face 'smerge-mine) | 86 | (defvar smerge-mine-face 'smerge-mine) |
| 91 | 87 | ||
| @@ -96,8 +92,7 @@ Used in `smerge-diff-base-mine' and related functions." | |||
| 96 | :background "#335533") | 92 | :background "#335533") |
| 97 | (((class color)) | 93 | (((class color)) |
| 98 | :foreground "green")) | 94 | :foreground "green")) |
| 99 | "Face for the other code." | 95 | "Face for the other code.") |
| 100 | :group 'smerge) | ||
| 101 | (define-obsolete-face-alias 'smerge-other-face 'smerge-other "22.1") | 96 | (define-obsolete-face-alias 'smerge-other-face 'smerge-other "22.1") |
| 102 | (defvar smerge-other-face 'smerge-other) | 97 | (defvar smerge-other-face 'smerge-other) |
| 103 | 98 | ||
| @@ -108,8 +103,7 @@ Used in `smerge-diff-base-mine' and related functions." | |||
| 108 | :background "#888833") | 103 | :background "#888833") |
| 109 | (((class color)) | 104 | (((class color)) |
| 110 | :foreground "yellow")) | 105 | :foreground "yellow")) |
| 111 | "Face for the base code." | 106 | "Face for the base code.") |
| 112 | :group 'smerge) | ||
| 113 | (define-obsolete-face-alias 'smerge-base-face 'smerge-base "22.1") | 107 | (define-obsolete-face-alias 'smerge-base-face 'smerge-base "22.1") |
| 114 | (defvar smerge-base-face 'smerge-base) | 108 | (defvar smerge-base-face 'smerge-base) |
| 115 | 109 | ||
| @@ -118,15 +112,13 @@ Used in `smerge-diff-base-mine' and related functions." | |||
| 118 | (:background "grey85")) | 112 | (:background "grey85")) |
| 119 | (((background dark)) | 113 | (((background dark)) |
| 120 | (:background "grey30"))) | 114 | (:background "grey30"))) |
| 121 | "Face for the conflict markers." | 115 | "Face for the conflict markers.") |
| 122 | :group 'smerge) | ||
| 123 | (define-obsolete-face-alias 'smerge-markers-face 'smerge-markers "22.1") | 116 | (define-obsolete-face-alias 'smerge-markers-face 'smerge-markers "22.1") |
| 124 | (defvar smerge-markers-face 'smerge-markers) | 117 | (defvar smerge-markers-face 'smerge-markers) |
| 125 | 118 | ||
| 126 | (defface smerge-refined-change | 119 | (defface smerge-refined-change |
| 127 | '((t nil)) | 120 | '((t nil)) |
| 128 | "Face used for char-based changes shown by `smerge-refine'." | 121 | "Face used for char-based changes shown by `smerge-refine'.") |
| 129 | :group 'smerge) | ||
| 130 | 122 | ||
| 131 | (defface smerge-refined-removed | 123 | (defface smerge-refined-removed |
| 132 | '((default | 124 | '((default |
| @@ -137,7 +129,6 @@ Used in `smerge-diff-base-mine' and related functions." | |||
| 137 | :background "#aa2222") | 129 | :background "#aa2222") |
| 138 | (t :inverse-video t)) | 130 | (t :inverse-video t)) |
| 139 | "Face used for removed characters shown by `smerge-refine'." | 131 | "Face used for removed characters shown by `smerge-refine'." |
| 140 | :group 'smerge | ||
| 141 | :version "24.3") | 132 | :version "24.3") |
| 142 | 133 | ||
| 143 | (defface smerge-refined-added | 134 | (defface smerge-refined-added |
| @@ -149,7 +140,6 @@ Used in `smerge-diff-base-mine' and related functions." | |||
| 149 | :background "#22aa22") | 140 | :background "#22aa22") |
| 150 | (t :inverse-video t)) | 141 | (t :inverse-video t)) |
| 151 | "Face used for added characters shown by `smerge-refine'." | 142 | "Face used for added characters shown by `smerge-refine'." |
| 152 | :group 'smerge | ||
| 153 | :version "24.3") | 143 | :version "24.3") |
| 154 | 144 | ||
| 155 | (easy-mmode-defmap smerge-basic-map | 145 | (easy-mmode-defmap smerge-basic-map |
| @@ -172,7 +162,6 @@ Used in `smerge-diff-base-mine' and related functions." | |||
| 172 | 162 | ||
| 173 | (defcustom smerge-command-prefix "\C-c^" | 163 | (defcustom smerge-command-prefix "\C-c^" |
| 174 | "Prefix for `smerge-mode' commands." | 164 | "Prefix for `smerge-mode' commands." |
| 175 | :group 'smerge | ||
| 176 | :type '(choice (const :tag "ESC" "\e") | 165 | :type '(choice (const :tag "ESC" "\e") |
| 177 | (const :tag "C-c ^" "\C-c^" ) | 166 | (const :tag "C-c ^" "\C-c^" ) |
| 178 | (const :tag "none" "") | 167 | (const :tag "none" "") |