--- Begin Message ---
Subject: |
[PATCH] etc: snippets: Do not match unintended quotes. |
Date: |
Thu, 12 Oct 2023 20:19:08 +0200 |
* etc/snippets/tempel/scheme-mode (origin): Unquote ‘git-fetch’, ‘svn-fetch’,
‘hg-fetch’, ‘cvs-fetch’, and ‘bzr-fetch’. Use ‘otherwise’ instead of ‘t’.
---
etc/snippets/tempel/scheme-mode | 22 +++++++++++-----------
1 file changed, 11 insertions(+), 11 deletions(-)
diff --git a/etc/snippets/tempel/scheme-mode b/etc/snippets/tempel/scheme-mode
index ef73a1e595..249f4ce8e3 100644
--- a/etc/snippets/tempel/scheme-mode
+++ b/etc/snippets/tempel/scheme-mode
@@ -18,32 +18,32 @@ scheme-mode
"(origin"
n> "(method " (p "url-fetch" method) ")"
n> "(uri " (cl-case (and method (intern method))
- ('git-fetch "git-reference...")
- ('svn-fetch "svn-reference...")
- ('hg-fetch "hg-reference...")
- ('cvs-fetch "cvs-reference...")
- ('bzr-fetch "bzr-reference...")
- (t "\"https://...\""))
+ (git-fetch "git-reference...")
+ (svn-fetch "svn-reference...")
+ (hg-fetch "hg-reference...")
+ (cvs-fetch "cvs-reference...")
+ (bzr-fetch "bzr-reference...")
+ (otherwise "\"https://...\""))
")"
n>
(cl-case (and method (intern method))
- ('git-fetch
+ (git-fetch
(insert "(file-name (git-file-name name version))")
(newline)
(indent-according-to-mode))
- ('hg-fetch
+ (hg-fetch
(insert "(file-name (hg-file-name name version))")
(newline)
(indent-according-to-mode))
- ('svn-fetch
+ (svn-fetch
(insert "(file-name (string-append name \"-\" version \"-checkout\"))")
(newline)
(indent-according-to-mode))
- ('cvs-fetch
+ (cvs-fetch
(insert "(file-name (string-append name \"-\" version \"-checkout\"))")
(newline)
(indent-according-to-mode))
- ('bzr-fetch
+ (bzr-fetch
(insert "(file-name (string-append name \"-\" version \"-checkout\"))")
(newline)
(indent-according-to-mode))
base-commit: 1328c4cca531318e3ed90c6aecb522a5b22a4bcc
prerequisite-patch-id: c1e8930b4fa8edf38130d45c5205a019b6e26dc7
prerequisite-patch-id: 730b3b393d9502ebb6b8339f7ead9589cec71c6f
prerequisite-patch-id: 1fdb09d54aa0ba3082f9501119c9810a36b0c66a
prerequisite-patch-id: 355921c4b3df14383f153b3ba8eb4d0ae6f0ab6c
--
2.41.0
--- End Message ---
--- Begin Message ---
Subject: |
Re: [PATCH] etc: snippets: Do not match unintended quotes. |
Date: |
Sun, 15 Oct 2023 12:33:05 +0200 |
User-agent: |
Evolution 3.46.4 |
Am Donnerstag, dem 12.10.2023 um 20:19 +0200 schrieb Liliana Marie
Prikler:
> * etc/snippets/tempel/scheme-mode (origin): Unquote ‘git-fetch’,
> ‘svn-fetch’,
> ‘hg-fetch’, ‘cvs-fetch’, and ‘bzr-fetch’. Use ‘otherwise’ instead of
> ‘t’.
> ---
Pushed.
--- End Message ---