| 1 |
commit: ba99777727cb240af09e3e546c919d1704841c11 |
| 2 |
Author: Ulrich Müller <ulm <AT> gentoo <DOT> org> |
| 3 |
AuthorDate: Sat Mar 4 21:42:53 2017 +0000 |
| 4 |
Commit: Ulrich Müller <ulm <AT> gentoo <DOT> org> |
| 5 |
CommitDate: Sat Mar 4 21:42:53 2017 +0000 |
| 6 |
URL: https://gitweb.gentoo.org/proj/emacs-tools.git/commit/?id=ba997777 |
| 7 |
|
| 8 |
Reformat ebuild-mode-insert-skeleton. |
| 9 |
|
| 10 |
ebuild-mode.el | 20 ++++++++------------ |
| 11 |
1 file changed, 8 insertions(+), 12 deletions(-) |
| 12 |
|
| 13 |
diff --git a/ebuild-mode.el b/ebuild-mode.el |
| 14 |
index 859257f..3e00080 100644 |
| 15 |
--- a/ebuild-mode.el |
| 16 |
+++ b/ebuild-mode.el |
| 17 |
@@ -471,9 +471,8 @@ and `all-completions' for details." |
| 18 |
& "\n\n" | -5 |
| 19 |
;; inherited eclasses |
| 20 |
"inherit " |
| 21 |
- ((completing-read |
| 22 |
- "Eclass (null string to terminate): " |
| 23 |
- (mapcar 'list ebuild-mode-eclasses)) |
| 24 |
+ ((completing-read "Eclass (null string to terminate): " |
| 25 |
+ (mapcar 'list ebuild-mode-eclasses)) |
| 26 |
str & " ") |
| 27 |
& -1 & "\n\n" | -8 |
| 28 |
;; first variables block |
| 29 |
@@ -489,9 +488,8 @@ and `all-completions' for details." |
| 30 |
"\n" |
| 31 |
;; second variables block |
| 32 |
"LICENSE=\"" |
| 33 |
- ((completing-read |
| 34 |
- "License (null string to terminate): " |
| 35 |
- (mapcar 'list ebuild-mode-licenses)) |
| 36 |
+ ((completing-read "License (null string to terminate): " |
| 37 |
+ (mapcar 'list ebuild-mode-licenses)) |
| 38 |
str & " ") |
| 39 |
& -1 "\"\n" |
| 40 |
"SLOT=\"0\"\n" |
| 41 |
@@ -504,15 +502,13 @@ and `all-completions' for details." |
| 42 |
str & " ") |
| 43 |
& -1 "\"\n" |
| 44 |
"IUSE=\"" |
| 45 |
- ((completing-read |
| 46 |
- "USE flag (null string to terminate): " |
| 47 |
- (mapcar 'list ebuild-mode-use-flags)) |
| 48 |
+ ((completing-read "USE flag (null string to terminate): " |
| 49 |
+ (mapcar 'list ebuild-mode-use-flags)) |
| 50 |
str & " ") |
| 51 |
& -1 & "\"\n" | -6 |
| 52 |
"RESTRICT=\"" |
| 53 |
- ((completing-read |
| 54 |
- "RESTRICT (null string to terminate): " |
| 55 |
- (mapcar 'list ebuild-mode-restrict-list)) |
| 56 |
+ ((completing-read "RESTRICT (null string to terminate): " |
| 57 |
+ (mapcar 'list ebuild-mode-restrict-list)) |
| 58 |
str & " ") |
| 59 |
& -1 & "\"\n" | -10 |
| 60 |
"\n" |
Archives