diff options
Diffstat (limited to 'perl-install')
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; |