From 05717cd36bda800bf559e11c9911391f28f24ea0 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Tue, 5 Oct 2010 19:26:17 +0200 Subject: checklinks: Remove support for .links --- bin/checklinks | 11 +++-------- 1 file changed, 3 insertions(+), 8 deletions(-) (limited to 'bin') diff --git a/bin/checklinks b/bin/checklinks index 289f438..f161d7f 100755 --- a/bin/checklinks +++ b/bin/checklinks @@ -182,18 +182,13 @@ GetOptions( 'r|remove' => \$remove, ); -if (-f '.links') { - $linkfile = '.links'; +if ($ct_auto) { + loop_links(); + exit 0; } elsif (-f 'links') { $linkfile = 'links'; } -else { - if ($ct_auto) { - loop_links(); - } - exit(0); -} open(my $links, '<', $linkfile) or die("Cannot open $linkfile: $!"); while (my $line = <$links>) { -- cgit v1.2.3