[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master c501c16 02/10: allow for easier decreasing lists as well
From: |
Oleh Krehel |
Subject: |
[elpa] master c501c16 02/10: allow for easier decreasing lists as well |
Date: |
Wed, 30 Aug 2017 13:46:03 -0400 (EDT) |
branch: master
commit c501c16bd93425a0da32e2ae79f41962022c3846
Author: nverno <address@hidden>
Commit: nverno <address@hidden>
allow for easier decreasing lists as well
---
tiny.el | 18 +++++++++---------
1 file changed, 9 insertions(+), 9 deletions(-)
diff --git a/tiny.el b/tiny.el
index f6b2b02..d2fff20 100644
--- a/tiny.el
+++ b/tiny.el
@@ -194,6 +194,8 @@ Defaults are used in place of null values."
(fmt (car tes))
(n-need (cl-count nil (cdr tes)))
(idx -1)
+ (seq (number-sequence (read n0) (read n2)
+ (if (>= (read n0) (read n2)) -1 1)))
(format-expression
(concat "(mapconcat (lambda(x) (let ((lst %s)) (format %S "
(mapconcat (lambda (x)
@@ -203,15 +205,13 @@ Defaults are used in place of null values."
(format "(nth %d lst)" (incf idx)))))
(cdr tes)
" ")
- ")))(number-sequence %s %s) \"%s\")")))
- (unless (>= (read n0) (read n2))
- (format
- format-expression
- expr
- (replace-regexp-in-string "\\\\n" "\n" fmt)
- n0
- n2
- s1))))))
+ ")))'%S \"%s\")")))
+ (format
+ format-expression
+ expr
+ (replace-regexp-in-string "\\\\n" "\n" fmt)
+ seq
+ s1)))))
(defconst tiny-format-str
(let ((flags "[+ #-0]\\{0,1\\}")
- [elpa] master updated (78af78e -> 3f47a2a), Oleh Krehel, 2017/08/30
- [elpa] master c501c16 02/10: allow for easier decreasing lists as well,
Oleh Krehel <=
- [elpa] master 79ecc9d 04/10: Makefile: Fix "test" target offline, Oleh Krehel, 2017/08/30
- [elpa] master e959cd5 03/10: add a couple tests, Oleh Krehel, 2017/08/30
- [elpa] master d775201 01/10: Fix the failing test, Oleh Krehel, 2017/08/30
- [elpa] master 1766056 06/10: .travis.yml: Try to install undercover, Oleh Krehel, 2017/08/30
- [elpa] master f1f40b6 05/10: .travis.yml: Try without Cask, Oleh Krehel, 2017/08/30
- [elpa] master 3ae24d6 09/10: tiny.el: Bump version, Oleh Krehel, 2017/08/30
- [elpa] master 354b635 08/10: Add tiny-helper command, Oleh Krehel, 2017/08/30
- [elpa] master 6e8e8ad 07/10: Minor Commentary edits, Oleh Krehel, 2017/08/30
- [elpa] master 3f47a2a 10/10: Merge commit '3ae24d6b02b3b13a5468174599183102e1cb3c11' from tiny, Oleh Krehel, 2017/08/30