branch: elpa/drupal-mode
commit 9ca9376c93b0af252fc2cb61bce859bb71b6f734
Author: Arne Jørgensen <[email protected]>
Commit: Arne Jørgensen <[email protected]>
Addes wrapper function and added test cases to package.
---
Makefile | 2 +-
drupal-tests.el | 10 ++++++++--
2 files changed, 9 insertions(+), 3 deletions(-)
diff --git a/Makefile b/Makefile
index 11641c69fa..05de0db1b4 100644
--- a/Makefile
+++ b/Makefile
@@ -28,7 +28,7 @@ $(ARCHIVE_NAME)-pkg.el: $(ARCHIVE_NAME).el
(package-buffer-info))))"
# create a tar ball in package.el format for uploading to
http://marmalade-repo.org
-$(PACKAGE_NAME).tar: README $(ARCHIVE_NAME).el $(ARCHIVE_NAME)-pkg.el
$(ARCHIVE_NAME).info dir drupal/*.el
+$(PACKAGE_NAME).tar: README $(ARCHIVE_NAME).el $(ARCHIVE_NAME)-pkg.el
$(ARCHIVE_NAME).info dir drupal/*.el drupal-tests.el
tar -c -s "@^@$(PACKAGE_NAME)/@" -f $(PACKAGE_NAME).tar $^
install: $(PACKAGE_NAME).tar
diff --git a/drupal-tests.el b/drupal-tests.el
index dadf37c541..04c5f8d773 100644
--- a/drupal-tests.el
+++ b/drupal-tests.el
@@ -11,12 +11,18 @@
+(defun drupal-tests ()
+ "Run drupal-mode ERT test cases."
+ (interactive)
+ (ert "drupal-.*"))
+
+
+
(ert-deftest drupal-major-version-test ()
"Test `drupal-major-version'."
(should (equal (drupal-major-version "7.12") "7"))
(should (equal (drupal-major-version "6.1") "6"))
- (should (equal (drupal-major-version "4.5.2") "4.5"))
-)
+ (should (equal (drupal-major-version "4.5.2") "4.5")))