[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/dash b337ef9 052/426: Sync examples-to-docs.el with the
From: |
Phillip Lord |
Subject: |
[elpa] externals/dash b337ef9 052/426: Sync examples-to-docs.el with the one in s.el |
Date: |
Tue, 04 Aug 2015 19:36:39 +0000 |
branch: externals/dash
commit b337ef957b4dc789ad6408bb2d395228a8dda131
Author: Magnar Sveen <address@hidden>
Commit: Magnar Sveen <address@hidden>
Sync examples-to-docs.el with the one in s.el
---
examples-to-docs.el | 16 +++++++++++-----
1 files changed, 11 insertions(+), 5 deletions(-)
diff --git a/examples-to-docs.el b/examples-to-docs.el
index 40063a5..20fcda6 100644
--- a/examples-to-docs.el
+++ b/examples-to-docs.el
@@ -1,11 +1,17 @@
-(require 'bang)
-
(defvar functions '())
(defun example-to-string (example)
(let ((actual (car example))
(expected (cadr (cdr example))))
- (replace-regexp-in-string "\\\\\\?" "?" (format "%S ;; => %S" actual
expected))))
+ (replace-regexp-in-string
+ "\r" "\\r"
+ (replace-regexp-in-string
+ "\t" "\\t"
+ (replace-regexp-in-string
+ "\n" "\\n"
+ (replace-regexp-in-string
+ "\\\\\\?" "?"
+ (format "%S ;; => %S" actual expected)) t t) t t) t t)))
(defun examples-to-strings (examples)
(let (result)
@@ -47,13 +53,13 @@
(let ((case-fold-search nil))
(downcase
(replace-regexp-in-string "\\([a-z]\\)\\([A-Z]\\)" "\\1 \\2" s)))
- "[^A-Za-z0-9]+"))
+ "[^A-Za-z0-9]+" t))
(defun dashed-words (s)
"Convert string S to snake-case string."
(mapconcat 'identity (mapcar
'(lambda (word) (downcase word))
- (!!remove (equal it "") (split-name s))) "-"))
+ (split-name s)) "-"))
(defun github-id (command-name signature)
(dashed-words (format "%s %s" command-name signature)))
- [elpa] externals/dash 26113a1 041/426: Add pre-commit.sh that runs tests and updates readme., (continued)
- [elpa] externals/dash 26113a1 041/426: Add pre-commit.sh that runs tests and updates readme., Phillip Lord, 2015/08/04
- [elpa] externals/dash 78fc2a3 038/426: Quote and downcase params with digits in them too., Phillip Lord, 2015/08/04
- [elpa] externals/dash 32053cd 042/426: Update readme with development notes., Phillip Lord, 2015/08/04
- [elpa] externals/dash 0912aa2 048/426: Rename !uniq to !distinct, Phillip Lord, 2015/08/04
- [elpa] externals/dash 24262a1 054/426: Add file-local font-lock for defexamples and =>, Phillip Lord, 2015/08/04
- [elpa] externals/dash 9312469 053/426: !keep, Phillip Lord, 2015/08/04
- [elpa] externals/dash 657ee8b 040/426: Slight improvements to docs., Phillip Lord, 2015/08/04
- [elpa] externals/dash 286d1d8 050/426: Show quotes around strings in examples., Phillip Lord, 2015/08/04
- [elpa] externals/dash db8a745 056/426: Add !each, Phillip Lord, 2015/08/04
- [elpa] externals/dash f59b480 055/426: Add !some and !every?, Phillip Lord, 2015/08/04
- [elpa] externals/dash b337ef9 052/426: Sync examples-to-docs.el with the one in s.el,
Phillip Lord <=
- [elpa] externals/dash 2b89641 049/426: Remove needless duplication., Phillip Lord, 2015/08/04
- [elpa] externals/dash d83ea8a 061/426: Add installation instructions., Phillip Lord, 2015/08/04
- [elpa] externals/dash e1a362c 047/426: Update README to reflect changes in readme generation., Phillip Lord, 2015/08/04
- [elpa] externals/dash 5bd4593 067/426: Add note about !rpartial only working on Emacs 24+, Phillip Lord, 2015/08/04
- [elpa] externals/dash 05dec7a 062/426: Fix example., Phillip Lord, 2015/08/04
- [elpa] externals/dash 6f17346 068/426: Don't run !rpartial tests on Emacsen <24, Phillip Lord, 2015/08/04
- [elpa] externals/dash 4205e58 064/426: Add clojure threading macros, !-> and !->>, Phillip Lord, 2015/08/04
- [elpa] externals/dash cd2a793 069/426: Run travis-ci on both E23 and E24, Phillip Lord, 2015/08/04
- [elpa] externals/dash 1a7ad85 065/426: Mention Melpa in README, Phillip Lord, 2015/08/04
- [elpa] externals/dash 6be4c03 058/426: !first, Phillip Lord, 2015/08/04