| Patrick Williams | c124f4f | 2015-09-15 14:41:29 -0500 | [diff] [blame] | 1 | From a7f6d453e60256d329469a75b642cca854cebea1 Mon Sep 17 00:00:00 2001 |
| 2 | From: Brendan O'Dea <bod@debian.org> |
| 3 | Date: Tue, 8 Mar 2005 19:30:38 +1100 |
| 4 | Subject: Set location of libnet.cfg to /etc/perl/Net as /usr may not be |
| 5 | writable. |
| 6 | |
| 7 | Patch-Name: debian/libnet_config_path.diff |
| Brad Bishop | d7bf8c1 | 2018-02-25 22:55:05 -0500 | [diff] [blame] | 8 | Upstream-Status: Pending |
| Patrick Williams | c124f4f | 2015-09-15 14:41:29 -0500 | [diff] [blame] | 9 | --- |
| 10 | cpan/libnet/lib/Net/Config.pm | 7 +++---- |
| 11 | 1 file changed, 3 insertions(+), 4 deletions(-) |
| 12 | |
| 13 | diff --git a/cpan/libnet/lib/Net/Config.pm b/cpan/libnet/lib/Net/Config.pm |
| 14 | index 953a826..61ba12a 100644 |
| 15 | --- a/cpan/libnet/lib/Net/Config.pm |
| 16 | +++ b/cpan/libnet/lib/Net/Config.pm |
| 17 | @@ -68,9 +68,8 @@ my %nc = ( |
| 18 | TRY_INTERNET_CONFIG |
| 19 | } |
| 20 | |
| 21 | -my $file = __FILE__; |
| 22 | +my $file = '/etc/perl/Net/libnet.cfg'; |
| 23 | my $ref; |
| 24 | -$file =~ s/Config.pm/libnet.cfg/; |
| 25 | if (-f $file) { |
| 26 | $ref = eval { local $SIG{__DIE__}; do $file }; |
| 27 | if (ref($ref) eq 'HASH') { |
| 28 | @@ -142,8 +141,8 @@ Net::Config - Local configuration data for libnet |
| 29 | C<Net::Config> holds configuration data for the modules in the libnet |
| 30 | distribution. During installation you will be asked for these values. |
| 31 | |
| 32 | -The configuration data is held globally in a file in the perl installation |
| 33 | -tree, but a user may override any of these values by providing their own. This |
| 34 | +The configuration data is held globally in C</etc/perl/Net/libnet.cfg>, |
| 35 | +but a user may override any of these values by providing their own. This |
| 36 | can be done by having a C<.libnetrc> file in their home directory. This file |
| 37 | should return a reference to a HASH containing the keys described below. |
| 38 | For example |