[Rt-commit] r8889 - rtfm/branches/2.1-TESTING/lib/RT/URI

[ruz at bestpractical.com]

Author: ruz
Date: Tue Sep  4 10:57:33 2007
New Revision: 8889

Modified:
   rtfm/branches/2.1-TESTING/lib/RT/URI/fsck_com_rtfm.pm

Log:
* delete inline tests, those are in t/URI_fsck_com_rtfm.t

Modified: rtfm/branches/2.1-TESTING/lib/RT/URI/fsck_com_rtfm.pm
==============================================================================
--- rtfm/branches/2.1-TESTING/lib/RT/URI/fsck_com_rtfm.pm	(original)
+++ rtfm/branches/2.1-TESTING/lib/RT/URI/fsck_com_rtfm.pm	Tue Sep  4 10:57:33 2007
@@ -28,22 +28,6 @@
 
 Returns the prefix for a local article URI
 
-=begin testing
-
-use_ok("RT::URI::fsck_com_rtfm");
-my $uri = RT::URI::fsck_com_rtfm->new($RT::SystemUser);
-
-ok(ref($uri));
-
-ok (UNIVERSAL::isa($uri,RT::URI::fsck_com_rtfm), "It's an RT::URI::fsck_com_rtfm");
-
-ok ($uri->isa('RT::URI::base'), "It's an RT::URI::base");
-ok ($uri->isa('RT::Base'), "It's an RT::Base");
-
-is ($uri->LocalURIPrefix , 'fsck.com-rtfm://example.com/article/');
-
-=end testing
-
 =cut
 
 sub LocalURIPrefix {
@@ -56,15 +40,6 @@
 
 Returns the RT URI for a local RT::article object
 
-=begin testing
-
-my $article = RT::FM::Article->new($RT::SystemUser);
-$article->Load(1);
-my $uri = RT::URI::fsck_com_rtfm->new($article->CurrentUser);
-is($uri->LocalURIPrefix . "1" , $uri->URIForObject($article));
-
-=end testing
-
 =cut
 
 sub URIForObject {