Fail a test if an rcs_receive() hook is ever defined for CVS.
authorAmitai Schlair <schmonz-web-ikiwiki@schmonz.com>
Wed, 1 Feb 2012 16:04:37 +0000 (11:04 -0500)
committerAmitai Schlair <schmonz-web-ikiwiki@schmonz.com>
Wed, 1 Feb 2012 16:04:37 +0000 (11:04 -0500)
t/cvs.t

diff --git a/t/cvs.t b/t/cvs.t
index af91b1c64b74c5303c335b986cf230d1c5143542..62ed179f3af428fe5529d6816f4883e33bbfd027 100755 (executable)
--- a/t/cvs.t
+++ b/t/cvs.t
@@ -333,7 +333,10 @@ sub test_rcs_getmtime {
 }
 
 sub test_rcs_receive {
-       pass(q{rcs_receive doesn't make sense for CVS});
+       my $description = q{rcs_receive doesn't make sense for CVS};
+       exists $IkiWiki::hooks{rcs}{rcs_receive}
+               ? fail($description)
+               : pass($description);
 }
 
 sub test_rcs_preprevert {