no_comment

69 files changed, 72 insertions, 72 deletions

diff --git a/perl-install/Newt/Newt.pm b/perl-install/Newt/Newt.pm
index 80dbaf54f..fdf9c0232 100644
--- a/perl-install/Newt/Newt.pm
+++ b/perl-install/Newt/Newt.pm
@@ -1,4 +1,4 @@
-package Newt;
+package Newt; # $Id$
 
 use strict;
 use vars qw($VERSION @ISA);
@@ -9,8 +9,8 @@ use vars qw($VERSION @ISA);
 $VERSION = '0.01';
 bootstrap Newt $VERSION;
 
-package Newt::Component;
-package Newt::Grid;
+package Newt::Component; # $Id$
+package Newt::Grid; # $Id$
 
 
 1;
diff --git a/perl-install/Xconfig.pm b/perl-install/Xconfig.pm
index 6bad6d93e..438862971 100644
--- a/perl-install/Xconfig.pm
+++ b/perl-install/Xconfig.pm
@@ -1,4 +1,4 @@
-package Xconfig;
+package Xconfig; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/Xconfigurator.pm b/perl-install/Xconfigurator.pm
index 3c1de1982..02e84c8cc 100644
--- a/perl-install/Xconfigurator.pm
+++ b/perl-install/Xconfigurator.pm
@@ -1,4 +1,4 @@
-package Xconfigurator;
+package Xconfigurator; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/Xconfigurator_consts.pm b/perl-install/Xconfigurator_consts.pm
index 961e09f19..1c84c33db 100644
--- a/perl-install/Xconfigurator_consts.pm
+++ b/perl-install/Xconfigurator_consts.pm
@@ -1,4 +1,4 @@
-package Xconfigurator;
+package Xconfigurator; # $Id$
 
 use common qw(:common);
 
diff --git a/perl-install/any.pm b/perl-install/any.pm
index 850a3be52..8500c7ed7 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -1,4 +1,4 @@
-package any;
+package any; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index f7095e223..ffde61d6a 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -1,4 +1,4 @@
-package bootloader;
+package bootloader; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/c.pm b/perl-install/c.pm
index e2cfe0428..0683c0ef8 100644
--- a/perl-install/c.pm
+++ b/perl-install/c.pm
@@ -1,4 +1,4 @@
-package c;
+package c; # $Id$
 
 use vars qw($AUTOLOAD);
 
diff --git a/perl-install/c/stuff.pm b/perl-install/c/stuff.pm
index ab6fc4669..0cb3e99f3 100644
--- a/perl-install/c/stuff.pm
+++ b/perl-install/c/stuff.pm
@@ -1,4 +1,4 @@
-package c::stuff;
+package c::stuff; # $Id$
 
 use strict;
 use vars qw($VERSION @ISA);
diff --git a/perl-install/class_discard.pm b/perl-install/class_discard.pm
index 5242e6e8e..2a1b91351 100644
--- a/perl-install/class_discard.pm
+++ b/perl-install/class_discard.pm
@@ -1,4 +1,4 @@
-package class_discard;
+package class_discard; # $Id$
 
 sub new { bless {}, "class_discard" }
 
diff --git a/perl-install/commands.pm b/perl-install/commands.pm
index 20f2466af..f23caef0d 100644
--- a/perl-install/commands.pm
+++ b/perl-install/commands.pm
@@ -5,7 +5,7 @@
 #- swapoff, ls, cp, ps, dd, head, tail, strings, hexdump, more, insmod,
 #- modprobe, route, df, kill, lspci, lssbus, dmesg, sort, du, 
 #-########################################################################
-package commands;
+package commands; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/common.pm b/perl-install/common.pm
index 4ab8178a4..39d3dd161 100644
--- a/perl-install/common.pm
+++ b/perl-install/common.pm
@@ -1,4 +1,4 @@
-package common;
+package common; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/crypto.pm b/perl-install/crypto.pm
index 8d225c828..780539cc9 100644
--- a/perl-install/crypto.pm
+++ b/perl-install/crypto.pm
@@ -1,4 +1,4 @@
-package crypto;
+package crypto; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm
index 414663da3..8ae0ca346 100644
--- a/perl-install/detect_devices.pm
+++ b/perl-install/detect_devices.pm
@@ -1,4 +1,4 @@
-package detect_devices;
+package detect_devices; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/devices.pm b/perl-install/devices.pm
index 0e4f1c671..a91e60ae9 100644
--- a/perl-install/devices.pm
+++ b/perl-install/devices.pm
@@ -1,4 +1,4 @@
-package devices;
+package devices; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/fs.pm b/perl-install/fs.pm
index 5b5876415..f268fc7d6 100644
--- a/perl-install/fs.pm
+++ b/perl-install/fs.pm
@@ -1,4 +1,4 @@
-package fs;
+package fs; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/fsedit.pm b/perl-install/fsedit.pm
index 72a96cfd9..b301524f5 100644
--- a/perl-install/fsedit.pm
+++ b/perl-install/fsedit.pm
@@ -1,4 +1,4 @@
-package fsedit;
+package fsedit; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/ftp.pm b/perl-install/ftp.pm
index 6bbd6cbae..a82729c6e 100644
--- a/perl-install/ftp.pm
+++ b/perl-install/ftp.pm
@@ -1,4 +1,4 @@
-package ftp;
+package ftp; # $Id$
 
 use Net::FTP;
 
diff --git a/perl-install/help.pm b/perl-install/help.pm
index 026a38113..864a019b8 100644
--- a/perl-install/help.pm
+++ b/perl-install/help.pm
@@ -1,4 +1,4 @@
-package help;
+package help; # $Id$
 
 use common qw(:common);
 
diff --git a/perl-install/http.pm b/perl-install/http.pm
index ce1b5430a..eb8ca0a09 100644
--- a/perl-install/http.pm
+++ b/perl-install/http.pm
@@ -1,4 +1,4 @@
-package http;
+package http; # $Id$
 
 use IO::Socket;
 
diff --git a/perl-install/install2 b/perl-install/install2
index bc85bc793..426b8ce21 100755
--- a/perl-install/install2
+++ b/perl-install/install2
@@ -1,7 +1,7 @@
 #!/usr/bin/perl
 
-#- Mandrake Graphic Install
-#- Copyright (C) 1999 MandrakeSoft (pixel@linux-mandrake.com)
+#- Mandrake Graphic Install $Id$
+#- Copyright (C) 1999/2000 MandrakeSoft (pixel@linux-mandrake.com)
 #-
 #- This program is free software; you can redistribute it and/or modify
 #- it under the terms of the GNU General Public License as published by
diff --git a/perl-install/install2.pm b/perl-install/install2.pm
index 8ed5e4ab0..6262d8d31 100644
--- a/perl-install/install2.pm
+++ b/perl-install/install2.pm
@@ -1,5 +1,5 @@
 
-package install2;
+package install2; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index ae67f4c0a..a686706b2 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -1,4 +1,4 @@
-package install_any;
+package install_any; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/install_gtk.pm b/perl-install/install_gtk.pm
index e8a2b9716..53a18e444 100644
--- a/perl-install/install_gtk.pm
+++ b/perl-install/install_gtk.pm
@@ -1,4 +1,4 @@
-package install_gtk;
+package install_gtk; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/install_interactive.pm b/perl-install/install_interactive.pm
index e51fa5a8b..4fcaca28f 100644
--- a/perl-install/install_interactive.pm
+++ b/perl-install/install_interactive.pm
@@ -1,4 +1,4 @@
-package install_interactive;
+package install_interactive; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm
index 6e36e3787..099d42288 100644
--- a/perl-install/install_steps.pm
+++ b/perl-install/install_steps.pm
@@ -1,4 +1,4 @@
-package install_steps;
+package install_steps; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/install_steps_auto_install.pm b/perl-install/install_steps_auto_install.pm
index f6043bf75..5a0f704b1 100644
--- a/perl-install/install_steps_auto_install.pm
+++ b/perl-install/install_steps_auto_install.pm
@@ -1,4 +1,4 @@
-package install_steps_auto_install;
+package install_steps_auto_install; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm
index bafee482e..92645ae35 100644
--- a/perl-install/install_steps_gtk.pm
+++ b/perl-install/install_steps_gtk.pm
@@ -1,4 +1,4 @@
-package install_steps_gtk;
+package install_steps_gtk; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index 77d533d13..11825436e 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -1,4 +1,4 @@
-package install_steps_interactive;
+package install_steps_interactive; # $Id$
 
 
 use diagnostics;
diff --git a/perl-install/install_steps_newt.pm b/perl-install/install_steps_newt.pm
index ffff494f3..7fd1cab1f 100644
--- a/perl-install/install_steps_newt.pm
+++ b/perl-install/install_steps_newt.pm
@@ -1,4 +1,4 @@
-package install_steps_newt;
+package install_steps_newt; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/install_steps_stdio.pm b/perl-install/install_steps_stdio.pm
index 974e21c23..1ef8b83fa 100644
--- a/perl-install/install_steps_stdio.pm
+++ b/perl-install/install_steps_stdio.pm
@@ -1,4 +1,4 @@
-package install_steps_stdio;
+package install_steps_stdio; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/interactive.pm b/perl-install/interactive.pm
index bad32cf8d..60a0fb419 100644
--- a/perl-install/interactive.pm
+++ b/perl-install/interactive.pm
@@ -1,4 +1,4 @@
-package interactive;
+package interactive; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/interactive_gtk.pm b/perl-install/interactive_gtk.pm
index cd682d795..3a198a5dd 100644
--- a/perl-install/interactive_gtk.pm
+++ b/perl-install/interactive_gtk.pm
@@ -1,4 +1,4 @@
-package interactive_gtk;
+package interactive_gtk; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/interactive_newt.pm b/perl-install/interactive_newt.pm
index dc21c27e2..845bb0767 100644
--- a/perl-install/interactive_newt.pm
+++ b/perl-install/interactive_newt.pm
@@ -1,4 +1,4 @@
-package interactive_newt;
+package interactive_newt; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/interactive_stdio.pm b/perl-install/interactive_stdio.pm
index e37e71672..fd104ee4a 100644
--- a/perl-install/interactive_stdio.pm
+++ b/perl-install/interactive_stdio.pm
@@ -1,4 +1,4 @@
-package interactive_stdio;
+package interactive_stdio; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/keyboard.pm b/perl-install/keyboard.pm
index 70aa0df5f..3f74bc618 100644
--- a/perl-install/keyboard.pm
+++ b/perl-install/keyboard.pm
@@ -1,5 +1,5 @@
 
-package keyboard;
+package keyboard; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/lang.pm b/perl-install/lang.pm
index c282ae780..6b5498025 100644
--- a/perl-install/lang.pm
+++ b/perl-install/lang.pm
@@ -1,4 +1,4 @@
-package lang;
+package lang; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/log.pm b/perl-install/log.pm
index 853cabc8c..534529494 100644
--- a/perl-install/log.pm
+++ b/perl-install/log.pm
@@ -1,4 +1,4 @@
-package log;
+package log; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/loopback.pm b/perl-install/loopback.pm
index 4eb14a9dc..955019748 100644
--- a/perl-install/loopback.pm
+++ b/perl-install/loopback.pm
@@ -1,4 +1,4 @@
-package loopback;
+package loopback; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/modparm.pm b/perl-install/modparm.pm
index 46dcb23b7..b4dd71c13 100644
--- a/perl-install/modparm.pm
+++ b/perl-install/modparm.pm
@@ -1,4 +1,4 @@
-package modparm;
+package modparm; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/modules.pm b/perl-install/modules.pm
index b50b2467c..e2b86982f 100644
--- a/perl-install/modules.pm
+++ b/perl-install/modules.pm
@@ -1,4 +1,4 @@
-package modules;
+package modules; # $Id$
 
 use strict;
 use vars qw(%drivers);
diff --git a/perl-install/mouse.pm b/perl-install/mouse.pm
index 0cd66164e..b9b9e7052 100644
--- a/perl-install/mouse.pm
+++ b/perl-install/mouse.pm
@@ -1,4 +1,4 @@
-package mouse;
+package mouse; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/my_gtk.pm b/perl-install/my_gtk.pm
index 07c4c47e3..6d16bae56 100644
--- a/perl-install/my_gtk.pm
+++ b/perl-install/my_gtk.pm
@@ -1,7 +1,7 @@
 #-########################################################################
 #- Pixel's implementation of Perl-GTK  :-)  [DDX]
 #-########################################################################
-package my_gtk;
+package my_gtk; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/network.pm b/perl-install/network.pm
index 002b74008..4d4db13d8 100644
--- a/perl-install/network.pm
+++ b/perl-install/network.pm
@@ -1,4 +1,4 @@
-package network;
+package network; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/partition_table.pm b/perl-install/partition_table.pm
index 95bbe7da8..d7d2c823f 100644
--- a/perl-install/partition_table.pm
+++ b/perl-install/partition_table.pm
@@ -1,4 +1,4 @@
-package partition_table;
+package partition_table; # $Id$
 
 #use diagnostics;
 #use strict;
diff --git a/perl-install/partition_table_bsd.pm b/perl-install/partition_table_bsd.pm
index a68d0ec4e..c6cd71394 100644
--- a/perl-install/partition_table_bsd.pm
+++ b/perl-install/partition_table_bsd.pm
@@ -1,4 +1,4 @@
-package partition_table_bsd;
+package partition_table_bsd; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/partition_table_dos.pm b/perl-install/partition_table_dos.pm
index 305aa862b..e8ef57851 100644
--- a/perl-install/partition_table_dos.pm
+++ b/perl-install/partition_table_dos.pm
@@ -1,4 +1,4 @@
-package partition_table_dos;
+package partition_table_dos; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/partition_table_empty.pm b/perl-install/partition_table_empty.pm
index d59cea52b..4379bdfad 100644
--- a/perl-install/partition_table_empty.pm
+++ b/perl-install/partition_table_empty.pm
@@ -1,4 +1,4 @@
-package partition_table_empty;
+package partition_table_empty; # $Id$
 
 #- this is a mainly dummy partition table. If we find it's empty, we just call -
 #- zero_MBR which will take care of bless'ing us to the partition table type best
diff --git a/perl-install/partition_table_mac.pm b/perl-install/partition_table_mac.pm
index 568e396b2..91d7cea01 100644
--- a/perl-install/partition_table_mac.pm
+++ b/perl-install/partition_table_mac.pm
@@ -1,4 +1,4 @@
-package partition_table_mac;
+package partition_table_mac; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/partition_table_raw.pm b/perl-install/partition_table_raw.pm
index 32910648b..131b34688 100644
--- a/perl-install/partition_table_raw.pm
+++ b/perl-install/partition_table_raw.pm
@@ -1,4 +1,4 @@
-package partition_table_raw;
+package partition_table_raw; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/partition_table_sun.pm b/perl-install/partition_table_sun.pm
index 55c3ab775..2eec591b3 100644
--- a/perl-install/partition_table_sun.pm
+++ b/perl-install/partition_table_sun.pm
@@ -1,4 +1,4 @@
-package partition_table_sun;
+package partition_table_sun; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm
index 7325721c3..5b56a4511 100644
--- a/perl-install/pkgs.pm
+++ b/perl-install/pkgs.pm
@@ -1,4 +1,4 @@
-package pkgs;
+package pkgs; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/printer.pm b/perl-install/printer.pm
index f1f937ebe..feb37eb2a 100644
--- a/perl-install/printer.pm
+++ b/perl-install/printer.pm
@@ -1,4 +1,4 @@
-package printer;
+package printer; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/printerdrake.pm b/perl-install/printerdrake.pm
index c5eafacd6..40fb9025f 100644
--- a/perl-install/printerdrake.pm
+++ b/perl-install/printerdrake.pm
@@ -1,4 +1,4 @@
-package printerdrake;
+package printerdrake; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/raid.pm b/perl-install/raid.pm
index 8bc4d858e..ddc2034ac 100644
--- a/perl-install/raid.pm
+++ b/perl-install/raid.pm
@@ -1,4 +1,4 @@
-package raid;
+package raid; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/resize_fat/any.pm b/perl-install/resize_fat/any.pm
index d06e2e755..3844e1c16 100644
--- a/perl-install/resize_fat/any.pm
+++ b/perl-install/resize_fat/any.pm
@@ -1,4 +1,4 @@
-package resize_fat::any;
+package resize_fat::any; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/resize_fat/boot_sector.pm b/perl-install/resize_fat/boot_sector.pm
index e7fa1c709..4ed4a73f7 100644
--- a/perl-install/resize_fat/boot_sector.pm
+++ b/perl-install/resize_fat/boot_sector.pm
@@ -1,4 +1,4 @@
-package resize_fat::boot_sector;
+package resize_fat::boot_sector; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/resize_fat/c_rewritten.pm b/perl-install/resize_fat/c_rewritten.pm
index 1f5f505c7..d74ecb5d3 100644
--- a/perl-install/resize_fat/c_rewritten.pm
+++ b/perl-install/resize_fat/c_rewritten.pm
@@ -1,4 +1,4 @@
-package resize_fat::c_rewritten;
+package resize_fat::c_rewritten; # $Id$
 
 use strict;
 use vars qw($VERSION @ISA);
diff --git a/perl-install/resize_fat/dir_entry.pm b/perl-install/resize_fat/dir_entry.pm
index d944c04ac..b39c72094 100644
--- a/perl-install/resize_fat/dir_entry.pm
+++ b/perl-install/resize_fat/dir_entry.pm
@@ -1,4 +1,4 @@
-package resize_fat::dir_entry;
+package resize_fat::dir_entry; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/resize_fat/directory.pm b/perl-install/resize_fat/directory.pm
index 1bc1014c6..beb780bcf 100644
--- a/perl-install/resize_fat/directory.pm
+++ b/perl-install/resize_fat/directory.pm
@@ -1,4 +1,4 @@
-package resize_fat::directory;
+package resize_fat::directory; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/resize_fat/fat.pm b/perl-install/resize_fat/fat.pm
index 0d8a32dfa..31643f0a3 100644
--- a/perl-install/resize_fat/fat.pm
+++ b/perl-install/resize_fat/fat.pm
@@ -1,4 +1,4 @@
-package resize_fat::fat;
+package resize_fat::fat; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/resize_fat/info_sector.pm b/perl-install/resize_fat/info_sector.pm
index dc459ef6c..1d9c1690a 100644
--- a/perl-install/resize_fat/info_sector.pm
+++ b/perl-install/resize_fat/info_sector.pm
@@ -1,4 +1,4 @@
-package resize_fat::info_sector;
+package resize_fat::info_sector; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/resize_fat/io.pm b/perl-install/resize_fat/io.pm
index 6543f9118..7643a0953 100644
--- a/perl-install/resize_fat/io.pm
+++ b/perl-install/resize_fat/io.pm
@@ -1,4 +1,4 @@
-package resize_fat::io;
+package resize_fat::io; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/resize_fat/main.pm b/perl-install/resize_fat/main.pm
index 256031228..dc1a65e65 100644
--- a/perl-install/resize_fat/main.pm
+++ b/perl-install/resize_fat/main.pm
@@ -19,7 +19,7 @@
 
 # This is mainly a perl rewrite of the work of Andrew Clausen (libresize)
 
-package resize_fat::main;
+package resize_fat::main; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/run_program.pm b/perl-install/run_program.pm
index c6fa53234..ad0f4ca95 100644
--- a/perl-install/run_program.pm
+++ b/perl-install/run_program.pm
@@ -1,4 +1,4 @@
-package run_program;
+package run_program; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/sbus_probing/main.pm b/perl-install/sbus_probing/main.pm
index 238540fe2..f3269e671 100644
--- a/perl-install/sbus_probing/main.pm
+++ b/perl-install/sbus_probing/main.pm
@@ -1,4 +1,4 @@
-package sbus_probing::main;
+package sbus_probing::main; # $Id$
 
 use c;
 use log;
diff --git a/perl-install/services.pm b/perl-install/services.pm
index b06f04d7e..f8fb3d6f6 100644
--- a/perl-install/services.pm
+++ b/perl-install/services.pm
@@ -1,4 +1,4 @@
-package services;
+package services; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/swap.pm b/perl-install/swap.pm
index c3d14e4b7..ed0669f8e 100644
--- a/perl-install/swap.pm
+++ b/perl-install/swap.pm
@@ -1,4 +1,4 @@
-package swap;
+package swap; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/timezone.pm b/perl-install/timezone.pm
index 13a29029a..559c6dbe8 100644
--- a/perl-install/timezone.pm
+++ b/perl-install/timezone.pm
@@ -1,4 +1,4 @@
-package timezone;
+package timezone; # $Id$
 
 use diagnostics;
 use strict;
diff --git a/perl-install/unused/cdrom.pm b/perl-install/unused/cdrom.pm
index b9b6ea699..040ac7e98 100644
--- a/perl-install/unused/cdrom.pm
+++ b/perl-install/unused/cdrom.pm
@@ -1,4 +1,4 @@
-package cdrom;
+package cdrom; # $Id$
 
 use diagnostics;
 use strict;