Item14237: Additional test for expected attach page URL

foswiki · May 13, 2018 · a2384af · a2384af
1 parent b7084ff
commit a2384af
Showing 1 changed file with 10 additions and 1 deletion.
diff --git a/UnitTestContrib/test/unit/PlackPostTests.pm b/UnitTestContrib/test/unit/PlackPostTests.pm
@@ -10,7 +10,7 @@ use Data::Dumper;
 use Encoding;
 
 use Foswiki::Class;
-extends qw(Unit::PlackTestCase);
+extends qw<Unit::PlackTestCase>;
 
 use constant SIMPLE_CONTENT =>
   "Simple Text File\nАбо просто текст у файлі\n";
@@ -82,6 +82,15 @@ sub _test_attach_simple {
     $this->assert( defined($matchedA), "Attach link not found in output" );
 
     my $attachUrl = $matchedA->{attrs}{href};
+
+    my $expectUrl = $app->getScriptUrlPath( $web, $topic, "attach" );
+    $this->assert_str_contains( $expectUrl, $attachUrl,
+            "Attach URL ("
+          . $attachUrl
+          . ") doesn't point back to view request web/topic ("
+          . $expectUrl
+          . ")" );
+
     $res     = $test->request( GET $attachUrl);
     $content = $res->content;