Update copyright notice

[empserver] / src / scripts / ls-sources.pl

diff --git a/src/scripts/ls-sources.pl b/src/scripts/ls-sources.pl
index b34f8b0fd1b5d1c46aa451a0114e9ec1d52e2e96..23c0cf9f82fbbbbe3840ac73ed7f7fad9fe1c328 100755 (executable)
--- a/src/scripts/ls-sources.pl
+++ b/src/scripts/ls-sources.pl
@@ -1,7 +1,7 @@
 #!/usr/bin/perl
 #
 #   Empire - A multi-player, client/server Internet based war game.
-#   Copyright (C) 1986-2015, Dave Pare, Jeff Bailey, Thomas Ruschak,
+#   Copyright (C) 1986-2020, Dave Pare, Jeff Bailey, Thomas Ruschak,
 #                 Ken Stevens, Steve McClure, Markus Armbruster
 #
 #   Empire is free software: you can redistribute it and/or modify
@@ -28,7 +28,7 @@
 #   ls-sources.pl: List source files
 #
 #   Known contributors to this file:
-#      Markus Armbruster, 2015
+#      Markus Armbruster, 2015-2016
 #
 # Usage: ls-sources.pl DIR REGEX
 #
@@ -51,9 +51,9 @@ my $srcdir = $dir;
 my $subdir = "";
 
 while (! -d "$srcdir/.git" and ! -r "$srcdir/sources.mk"
-       and $srcdir =~ m,^(.*)/([^/]*),) {
-    $srcdir = $1;
-    $subdir = "$2/$subdir";
+       and $srcdir =~ m,^((.*)/)?([^/]*),) {
+    $srcdir = $2 || ".";
+    $subdir = "$3/$subdir";
 }
 
 my @sources;