diff options
Diffstat (limited to 'rt/sbin/extract_pod_tests')
| -rw-r--r-- | rt/sbin/extract_pod_tests | 13 |
1 files changed, 3 insertions, 10 deletions
diff --git a/rt/sbin/extract_pod_tests b/rt/sbin/extract_pod_tests index 4d9d7bd6c..3987e90c7 100644 --- a/rt/sbin/extract_pod_tests +++ b/rt/sbin/extract_pod_tests @@ -1,9 +1,9 @@ #!/usr/bin/perl -# BEGIN BPS TAGGED BLOCK {{{ +# {{{ BEGIN BPS TAGGED BLOCK # # COPYRIGHT: # -# This software is Copyright (c) 1996-2005 Best Practical Solutions, LLC +# This software is Copyright (c) 1996-2004 Best Practical Solutions, LLC # <jesse@bestpractical.com> # # (Except where explicitly superseded by other copyright notices) @@ -43,7 +43,7 @@ # works based on those contributions, and sublicense and distribute # those contributions and any derivatives thereof. # -# END BPS TAGGED BLOCK }}} +# }}} END BPS TAGGED BLOCK use strict; use vars qw($VERSION); $VERSION = '0.06'; @@ -121,14 +121,7 @@ else { } -print $outfh <<EOF; -use Test::More qw/no_plan/; -use RT; -RT::LoadConfig(); -RT::Init(); - -EOF foreach my $test (@tests, @examples) { print $outfh "$test\n"; } |