link-checker commit: Drop dead code.

changeset:   378:e3fb02214532
user:        Ville Skyttä <ville.skytta@iki.fi>
date:        Sun Jan 02 23:08:25 2011 +0200
files:       bin/checklink
description:
Drop dead code.


diff -r 538982542f85 -r e3fb02214532 bin/checklink
--- a/bin/checklink	Mon Nov 08 23:55:04 2010 +0200
+++ b/bin/checklink	Sun Jan 02 23:08:25 2011 +0200
@@ -3063,17 +3063,10 @@
     return (' class="' . $class . '"');
 }
 
-sub show_url ($;$)
+sub show_url ($)
 {
-    my ($url, $fragment) = @_;
-    if (defined($fragment)) {
-        my $u = URI->new($url);
-        $u->fragment($fragment);
-        $url = $u->as_string();
-    }
-    $url = &encode($url);
-    return sprintf('<a href="%s">%s</a>',
-        $url, defined($fragment) ? &encode($fragment) : $url);
+    my ($url) = @_;
+    return sprintf('<a href="%s">%s</a>', (&encode($url)) x 2);
 }
 
 sub html_footer ()

Received on Sunday, 2 January 2011 21:16:49 UTC