Add message to top of `paredit-test' reporting what we're testing.

Ignore-this: a617d41480a852b472bc838b1a69bd16

darcs-hash:20110507220505-00fcc-0c92c0a098e8fb214e238bd380f5a6b69d991608

1 files changed, 1 insertions, 0 deletions

diff --git a/test.el b/test.el
index f9a76f1..4d83010 100644
--- a/test.el
+++ b/test.el
@@ -33,6 +33,7 @@ Four arguments: the paredit command, the text of the buffer
   (funcall paredit-test-failure-function command before after expected))
 
 (defun paredit-test (command examples)
+  (message "Testing %S..." command)
   (dolist (example examples)
     (let ((before (car example)))
       (dolist (expected (cdr example))