emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/dash 43e8b14 4/5: Remove some redundant quotes from exa


From: ELPA Syncer
Subject: [elpa] externals/dash 43e8b14 4/5: Remove some redundant quotes from examples
Date: Tue, 6 Jul 2021 15:57:10 -0400 (EDT)

branch: externals/dash
commit 43e8b149a5e215016ebd6b00190f06239c2ebe84
Author: Basil L. Contovounesios <contovob@tcd.ie>
Commit: Basil L. Contovounesios <contovob@tcd.ie>

    Remove some redundant quotes from examples
    
    * dev/examples.el (-split-on): Unquote self-quoting keywords.
    
    * README.md:
    * dash.texi: Regenerate docs.
---
 README.md       |  4 ++--
 dash.texi       |  4 ++--
 dev/examples.el | 10 +++++-----
 3 files changed, 9 insertions(+), 9 deletions(-)

diff --git a/README.md b/README.md
index 5c47209..baea7d8 100644
--- a/README.md
+++ b/README.md
@@ -1480,8 +1480,8 @@ See also [`-split-when`](#-split-when-fn-list)
 
 ```el
 (-split-on '| '(Nil | Leaf a | Node [Tree a])) ;; => ((Nil) (Leaf a) (Node 
[Tree a]))
-(-split-on ':endgroup '("a" "b" :endgroup "c" :endgroup "d" "e")) ;; => (("a" 
"b") ("c") ("d" "e"))
-(-split-on ':endgroup '("a" "b" :endgroup :endgroup "d" "e")) ;; => (("a" "b") 
("d" "e"))
+(-split-on :endgroup '("a" "b" :endgroup "c" :endgroup "d" "e")) ;; => (("a" 
"b") ("c") ("d" "e"))
+(-split-on :endgroup '("a" "b" :endgroup :endgroup "d" "e")) ;; => (("a" "b") 
("d" "e"))
 ```
 
 #### -split-when `(fn list)`
diff --git a/dash.texi b/dash.texi
index 1c5022b..e2d0d8c 100644
--- a/dash.texi
+++ b/dash.texi
@@ -2070,11 +2070,11 @@ See also @code{-split-when} (@pxref{-split-when})
     @result{} ((Nil) (Leaf a) (Node [Tree a]))
 @end group
 @group
-(-split-on ':endgroup '("a" "b" :endgroup "c" :endgroup "d" "e"))
+(-split-on :endgroup '("a" "b" :endgroup "c" :endgroup "d" "e"))
     @result{} (("a" "b") ("c") ("d" "e"))
 @end group
 @group
-(-split-on ':endgroup '("a" "b" :endgroup :endgroup "d" "e"))
+(-split-on :endgroup '("a" "b" :endgroup :endgroup "d" "e"))
     @result{} (("a" "b") ("d" "e"))
 @end group
 @end example
diff --git a/dev/examples.el b/dev/examples.el
index 2fb511f..95cdf98 100644
--- a/dev/examples.el
+++ b/dev/examples.el
@@ -806,11 +806,11 @@ value rather than consuming a list to produce a single 
value."
 
   (defexamples -split-on
     (-split-on '| '(Nil | Leaf a | Node [Tree a])) => '((Nil) (Leaf a) (Node 
[Tree a]))
-    (-split-on ':endgroup '("a" "b" :endgroup "c" :endgroup "d" "e")) => 
'(("a" "b") ("c") ("d" "e"))
-    (-split-on ':endgroup '("a" "b" :endgroup :endgroup "d" "e")) => '(("a" 
"b") ("d" "e"))
-    (-split-on ':endgroup '("a" "b" :endgroup "c" :endgroup)) => '(("a" "b") 
("c"))
-    (-split-on ':endgroup '("a" "b" :endgroup :endgroup :endgroup "d" "e")) => 
'(("a" "b") ("d" "e"))
-    (-split-on ':endgroup '(:endgroup "c" :endgroup "d" "e")) => '(("c") ("d" 
"e"))
+    (-split-on :endgroup '("a" "b" :endgroup "c" :endgroup "d" "e")) => '(("a" 
"b") ("c") ("d" "e"))
+    (-split-on :endgroup '("a" "b" :endgroup :endgroup "d" "e")) => '(("a" 
"b") ("d" "e"))
+    (-split-on :endgroup '("a" "b" :endgroup "c" :endgroup)) => '(("a" "b") 
("c"))
+    (-split-on :endgroup '("a" "b" :endgroup :endgroup :endgroup "d" "e")) => 
'(("a" "b") ("d" "e"))
+    (-split-on :endgroup '(:endgroup "c" :endgroup "d" "e")) => '(("c") ("d" 
"e"))
     (-split-on '| '(Nil | | Node [Tree a])) => '((Nil) (Node [Tree a])))
 
   (defexamples -split-when



reply via email to

[Prev in Thread] Current Thread [Next in Thread]