branch: elpa/buttercup
commit 553529f1877209772e2026b1fe0a87a2830b1aaa
Author: Ola Nilsson <[email protected]>
Commit: Ola Nilsson <[email protected]>
Remove obsolete buttercup-xdescribe
buttercup-xdescribe is no longer used by the xdescribe macro.
---
buttercup.el | 12 ------------
tests/test-buttercup.el | 18 ------------------
2 files changed, 30 deletions(-)
diff --git a/buttercup.el b/buttercup.el
index 80380fc..7a9e4a3 100644
--- a/buttercup.el
+++ b/buttercup.el
@@ -965,18 +965,6 @@ mainly calls to `describe', `it' and `before-each'."
;; make sure the suite is marked as pending
(signal 'buttercup-pending "PENDING")))
-(defun buttercup-xdescribe (description function)
- "Like `buttercup-describe', but mark the suite as disabled.
-
-A disabled suite is not run.
-
-DESCRIPTION has the same meaning as in `xdescribe'. FUNCTION
-is ignored.
-`describe'."
- (ignore function)
- (buttercup-describe description (lambda ()
- (signal 'buttercup-pending "PENDING"))))
-
;;;;;;;;;;;;;;;;;;;;;;
;;; Pending Specs: xit
diff --git a/tests/test-buttercup.el b/tests/test-buttercup.el
index 94f3ad3..d7ff1d9 100644
--- a/tests/test-buttercup.el
+++ b/tests/test-buttercup.el
@@ -497,24 +497,6 @@
:to-be
'pending))))
-
-(describe "The `buttercup-xdescribe' function"
- (it "should be a no-op"
- (expect (buttercup-xdescribe
- "bla bla"
- (lambda () (error "Should not happen")))
- :not :to-throw))
-
- (it "should add a pending suite"
- (let ((buttercup--current-suite nil)
- (buttercup-suites nil))
- (buttercup-xdescribe
- "bla bla"
- (lambda () nil))
- (expect (buttercup-suite-status (car buttercup-suites))
- :to-be
- 'pending))))
-
;;;;;;;;;;;;;;;;;;;;;;
;;; Pending Specs: xit
