mirror of
https://gitlab.isc.org/isc-projects/bind9
synced 2025-08-31 14:35:26 +00:00
add articleinfo support
This commit is contained in:
@@ -15,7 +15,7 @@
|
||||
# OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
|
||||
# PERFORMANCE OF THIS SOFTWARE.
|
||||
|
||||
# $Id: update_copyrights,v 1.41 2005/09/06 01:59:12 marka Exp $
|
||||
# $Id: update_copyrights,v 1.42 2006/10/24 00:57:16 marka Exp $
|
||||
|
||||
require 5.002;
|
||||
|
||||
@@ -423,6 +423,11 @@ foreach $file (keys %file_types) {
|
||||
$_ = <SOURCE>;
|
||||
$/ = "\n";
|
||||
|
||||
if ($type eq 'SGML' && m:<articleinfo>.*?</articleinfo>:s) {
|
||||
# print "docinfo: $file\n";
|
||||
my $r = copyrights(@years);
|
||||
s:<articleinfo>.*?</articleinfo>:<articleinfo>\n$r </articleinfo>:s;
|
||||
}
|
||||
if ($type eq 'SGML' && m:<docinfo>.*?</docinfo>:s) {
|
||||
# print "docinfo: $file\n";
|
||||
my $r = copyrights(@years);
|
||||
|
Reference in New Issue
Block a user