[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/buttercup 6330610 176/340: Add more markdown running funct
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/buttercup 6330610 176/340: Add more markdown running functions |
Date: |
Thu, 16 Dec 2021 14:59:29 -0500 (EST) |
branch: elpa/buttercup
commit 633061080e62feb02c75cce27e39c93b24f6e390
Author: Ola Nilsson <ola.nilsson@gmail.com>
Commit: Ola Nilsson <ola.nilsson@gmail.com>
Add more markdown running functions
Add function buttercup-run-markdown-buffer that runs all tests found
in the current buffer and buttercup-run-markdown-file that runs all
tests in a specified file.
These new functions are convenient to run markdown tests
interactively.
---
buttercup.el | 46 ++++++++++++++++++++++++++++++++++------------
1 file changed, 34 insertions(+), 12 deletions(-)
diff --git a/buttercup.el b/buttercup.el
index c199f16..10c09e0 100644
--- a/buttercup.el
+++ b/buttercup.el
@@ -1254,18 +1254,26 @@ current directory."
(buttercup-run)))
;;;###autoload
-(defun buttercup-run-markdown ()
- "Run all test suites defined in Markdown files passed as arguments.
-A suite must be defined within a Markdown \"lisp\" code block."
- (let ((lisp-buffer (generate-new-buffer "elisp")))
- (dolist (file command-line-args-left)
- (with-current-buffer (find-file-noselect file)
- (goto-char (point-min))
- (let ((case-fold-search t))
- (while (re-search-forward
- "```\\(?:emacs-\\|e\\)?lisp\n\\(\\(?:.\\|\n\\)*?\\)```"
- nil t)
- (let ((code (match-string 1)))
+(defun buttercup-run-markdown-buffer (&rest markdown-buffers)
+ "Run all test suites defined in MARKDOWN-BUFFERS.
+A suite must be defined within a Markdown \"lisp\" code block.
+If MARKDOWN-BUFFERS is empty (nil), use the current buffer."
+ (interactive)
+ (unless markdown-buffers
+ (setq markdown-buffers (list (current-buffer))))
+ (let ((lisp-buffer (generate-new-buffer "elisp"))
+ (case-fold-search t)
+ code
+ buttercup-suites)
+ (dolist (markdown-buffer markdown-buffers)
+ (with-current-buffer markdown-buffer
+ (save-excursion
+ (save-match-data
+ (goto-char (point-min))
+ (while (re-search-forward
+ "```\\(?:emacs-\\|e\\)?lisp\n\\(\\(?:.\\|\n\\)*?\\)```"
+ nil t)
+ (setq code (match-string 1))
(with-current-buffer lisp-buffer
(insert code)))))))
(with-current-buffer lisp-buffer
@@ -1274,6 +1282,20 @@ A suite must be defined within a Markdown \"lisp\" code
block."
(point-max)))
(buttercup-run)))
+;;;###autoload
+(defun buttercup-run-markdown ()
+ "Run all test suites defined in Markdown files passed as arguments.
+A suite must be defined within a Markdown \"lisp\" code block."
+ (apply #'buttercup-run-markdown-buffer (mapcar #'find-file-noselect
+ command-line-args-left)))
+
+;;;###autoload
+(defun buttercup-run-markdown-file (file)
+ "Run all test suites defined in Markdown FILE.
+A suite must be defined within a Markdown \"lisp\" code block."
+ (interactive "fMarkdown file: ")
+ (buttercup-run-markdown-buffer (find-file-noselect file)))
+
(eval-when-compile
;; Defined below in a dedicated section
(defvar buttercup-reporter))
- [nongnu] elpa/buttercup c032c8f 141/340: Exec code blocks in markdown labeled as "emacs-lisp" and "elisp", (continued)
- [nongnu] elpa/buttercup c032c8f 141/340: Exec code blocks in markdown labeled as "emacs-lisp" and "elisp", ELPA Syncer, 2021/12/16
- [nongnu] elpa/buttercup b97714d 144/340: Declare all variables before first use, ELPA Syncer, 2021/12/16
- [nongnu] elpa/buttercup 4128f3e 147/340: Document ERT support in writing-tests.md, ELPA Syncer, 2021/12/16
- [nongnu] elpa/buttercup 47dd72c 156/340: Set file local variables for consistent code style, ELPA Syncer, 2021/12/16
- [nongnu] elpa/buttercup 5458dcc 158/340: Replace buttercup-*-parents with buttercup-suite-or-spec-parents, ELPA Syncer, 2021/12/16
- [nongnu] elpa/buttercup 77367d3 165/340: Change shebang to use /usr/bin/env, ELPA Syncer, 2021/12/16
- [nongnu] elpa/buttercup bbbf692 166/340: Fix more compile warnings., ELPA Syncer, 2021/12/16
- [nongnu] elpa/buttercup bcaa7f0 163/340: Use buttercup--specs where possible, ELPA Syncer, 2021/12/16
- [nongnu] elpa/buttercup 61ebe91 171/340: Update README.md, ELPA Syncer, 2021/12/16
- [nongnu] elpa/buttercup 39d625c 173/340: Bump version: 1.11 → 1.12, ELPA Syncer, 2021/12/16
- [nongnu] elpa/buttercup 6330610 176/340: Add more markdown running functions,
ELPA Syncer <=
- [nongnu] elpa/buttercup 3d3aff9 178/340: Set file local code-style variables in test-buttercup.el, ELPA Syncer, 2021/12/16
- [nongnu] elpa/buttercup 553529f 181/340: Remove obsolete buttercup-xdescribe, ELPA Syncer, 2021/12/16
- [nongnu] elpa/buttercup 5821cd0 184/340: Merge pull request #131 from snogge/markdown, ELPA Syncer, 2021/12/16
- [nongnu] elpa/buttercup a394fea 191/340: Bump version: 1.13 → 1.14, ELPA Syncer, 2021/12/16
- [nongnu] elpa/buttercup 7cea4c6 192/340: Test buttercup-run, ELPA Syncer, 2021/12/16
- [nongnu] elpa/buttercup b410c78 193/340: Separate return code from reporter, ELPA Syncer, 2021/12/16
- [nongnu] elpa/buttercup 9b230dc 202/340: Fix the "should print the elapsed time for all specs" test, ELPA Syncer, 2021/12/16
- [nongnu] elpa/buttercup 9d172a7 205/340: Merge pull request #145 from snogge/test-fixes, ELPA Syncer, 2021/12/16
- [nongnu] elpa/buttercup c100fad 210/340: Implement buttercup-suppress-warning-capture, ELPA Syncer, 2021/12/16
- [nongnu] elpa/buttercup c994aea 212/340: Add LICENSE file., ELPA Syncer, 2021/12/16