# OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
# PERFORMANCE OF THIS SOFTWARE.
-# $Id: update_copyrights,v 1.46 2007/01/05 04:28:12 marka Exp $
+# $Id: update_copyrights,v 1.47 2007/01/05 05:54:06 marka Exp $
require 5.002;
print "$file: missing\n";
next;
}
+ # print "Doing: $file";
if ($years_list =~ /PARENT:/) {
getyears($years_list);
} elsif ($sgml_comment) {
$before_copyright = "";
while (/^<!DOCTYPE/ || /^<\?xml-stylesheet/ || /^<\?xml /) {
+ # print "SGML: $_";
$before_copyright = "$before_copyright$_";
- if (/\?>$/) {
+ if (/>$/ ) {
$_ = <SOURCE>;
close(SOURCE) if (eof(SOURCE));
next;
}
+ $_ = <SOURCE>;
while (!eof(SOURCE) && ! /^<!/ ) {
$before_copyright = "$before_copyright$_";
$_ = <SOURCE>;