1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
|
#! /bin/sh /usr/share/dpatch/dpatch-run
## 01_modules_location.dpatch by Damián Viano <des@debian.org>
##
## All lines beginning with `## DP:' are a description of the patch.
## DP: Patch to change some paths according to the move of modules to
## DP: /usr/share/cgiirc
@DPATCH@
diff -urNad cgiirc-0.5.9~/client-perl.cgi cgiirc-0.5.9/client-perl.cgi
--- cgiirc-0.5.9~/client-perl.cgi 2006-04-30 13:09:28.000000000 -0300
+++ cgiirc-0.5.9/client-perl.cgi 2007-05-16 21:54:34.000000000 -0300
@@ -18,7 +18,7 @@
# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
use strict;
-use lib qw/modules/;
+use lib qw,/usr/share/cgiirc/modules,;
use vars qw($VERSION $PREFIX);
# change this if needed
diff -urNad cgiirc-0.5.9~/irc.cgi cgiirc-0.5.9/irc.cgi
--- cgiirc-0.5.9~/irc.cgi 2006-06-06 15:53:50.000000000 -0300
+++ cgiirc-0.5.9/irc.cgi 2007-05-16 21:55:07.000000000 -0300
@@ -22,7 +22,7 @@
use strict;
use vars qw($VERSION $config $config_path);
-use lib qw/modules interfaces/;
+use lib qw,/usr/share/cgiirc/modules /usr/share/cgiirc/interfaces,;
no warnings 'uninitialized';
($VERSION =
diff -urNad cgiirc-0.5.9~/nph-irc.cgi cgiirc-0.5.9/nph-irc.cgi
--- cgiirc-0.5.9~/nph-irc.cgi 2006-06-06 15:50:12.000000000 -0300
+++ cgiirc-0.5.9/nph-irc.cgi 2007-05-16 21:55:52.000000000 -0300
@@ -22,7 +22,7 @@
require 5.004;
use strict;
-use lib qw{./modules ./interfaces};
+use lib qw{/usr/share/cgiirc/modules /usr/share/cgiirc/interfaces};
use vars qw(
$VERSION @handles %inbuffer $select_bits @output
$unixfh $ircfh $cookie $ctcptime $intime $pingtime
@@ -472,7 +472,7 @@
sub load_interface {
my $name = defined $cgi->{interface} ? $cgi->{interface} : 'default';
($name) = $name =~ /([a-z0-9]+)/i;
- require("./interfaces/$name.pm");
+ require("$name.pm");
$ioptions = parse_interface_cookie();
for(keys %$config) {
|
