Package: sql-ledger Version: 2.6.22-2 Severity: wishlist Tags: patch -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1
In this age, a comapny would surely want to include a website in addition to an address and telephone number. I have attached a trivial patch that enables support for such a thing, including placing it on invoices and the like. There is a dpatch scriptlet to make it easy to add to debian/patches, but also the standard patch which is suitable to be forwarded to upstream. Regards, - -Roberto - -- System Information: Debian Release: 4.0 APT prefers stable APT policy: (500, 'stable') Architecture: i386 (i686) Shell: /bin/sh linked to /bin/bash Kernel: Linux 2.6.18-5-k7 Locale: LANG=en_US.UTF-8, LC_CTYPE=en_US.UTF-8 (charmap=UTF-8) -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.6 (GNU/Linux) iD8DBQFG1h6x5SXWIKfIlGQRApYVAJwP3FYFZko+px1lQKzKwlztiUeaTgCeP/ON x2jiIFv3UfgOxLCTlFCqjKc= =a5YT -----END PGP SIGNATURE-----
15company-website.dpatch
Description: application/shellscript
diff -uNr sql-ledger-2.6.22.orig/SL/User.pm sql-ledger-2.6.22/SL/User.pm
--- sql-ledger-2.6.22.orig/SL/User.pm 2006-09-09 18:50:23.000000000 -0400
+++ sql-ledger-2.6.22/SL/User.pm 2007-08-29 20:54:16.000000000 -0400
@@ -947,7 +947,7 @@
dateformat dbconnect dbdriver dbhost dbname dboptions
dbpasswd dbport dbuser email fax menuwidth name numberformat
password printer sessionkey role sid signature stylesheet tel
- templates timeout vclimit);
+ templates timeout vclimit website);
@conf;
diff -uNr sql-ledger-2.6.22.orig/bin/lynx/admin.pl
sql-ledger-2.6.22/bin/lynx/admin.pl
--- sql-ledger-2.6.22.orig/bin/lynx/admin.pl 2006-09-10 14:00:18.000000000
-0400
+++ sql-ledger-2.6.22/bin/lynx/admin.pl 2007-08-29 21:00:28.000000000 -0400
@@ -536,6 +536,10 @@
<th align=right>|.$locale->text('Address').qq|</th>
<td><textarea name=address rows=4
cols=35>$myconfig->{address}</textarea></td>
</tr>
+ <tr>
+ <th align=right>|.$locale->text('Website').qq|</th>
+ <td><input name=website size=35 value="$myconfig{address}"</td>
+ </tr>
</table>
</td>
<td>
diff -uNr sql-ledger-2.6.22.orig/bin/lynx/am.pl sql-ledger-2.6.22/bin/lynx/am.pl
--- sql-ledger-2.6.22.orig/bin/lynx/am.pl 2006-11-22 13:26:09.000000000
-0500
+++ sql-ledger-2.6.22/bin/lynx/am.pl 2007-08-29 20:59:58.000000000 -0400
@@ -2109,6 +2109,10 @@
<th align=right>|.$locale->text('Address').qq|</th>
<td><textarea name=address rows=4
cols=35>$myconfig{address}</textarea></td>
</tr>
+ <tr>
+ <th align=right>|.$locale->text('Website').qq|</th>
+ <td><input name=website size=35 value="$myconfig{website}"></td>
+ </tr>
</table>
</td>
<td>
diff -uNr sql-ledger-2.6.22.orig/bin/lynx/io.pl sql-ledger-2.6.22/bin/lynx/io.pl
--- sql-ledger-2.6.22.orig/bin/lynx/io.pl 2006-11-13 17:17:35.000000000
-0500
+++ sql-ledger-2.6.22/bin/lynx/io.pl 2007-08-29 21:03:05.000000000 -0400
@@ -1372,12 +1372,12 @@
push @a, ("${inv}number", "${inv}date", "${due}date");
- for (qw(company address tel fax businessnumber)) { $form->{$_} =
$myconfig{$_} }
+ for (qw(company address website tel fax businessnumber)) { $form->{$_} =
$myconfig{$_} }
$form->{address} =~ s/\\n/\n/g;
for (qw(name email)) { $form->{"user$_"} = $myconfig{$_} }
- push @a, qw(company address tel fax businessnumber username useremail);
+ push @a, qw(company address website tel fax businessnumber username
useremail);
for (qw(notes intnotes)) { $form->{$_} =~ s/^\s+//g }
diff -uNr sql-ledger-2.6.22.orig/bin/mozilla/admin.pl
sql-ledger-2.6.22/bin/mozilla/admin.pl
--- sql-ledger-2.6.22.orig/bin/mozilla/admin.pl 2006-09-10 14:00:18.000000000
-0400
+++ sql-ledger-2.6.22/bin/mozilla/admin.pl 2007-08-29 21:00:10.000000000
-0400
@@ -536,6 +536,10 @@
<th align=right>|.$locale->text('Address').qq|</th>
<td><textarea name=address rows=4
cols=35>$myconfig->{address}</textarea></td>
</tr>
+ <tr>
+ <th align=right>|.$locale->text('Website').qq|</th>
+ <td><input name=website size=35 value="$myconfig{address}"</td>
+ </tr>
</table>
</td>
<td>
diff -uNr sql-ledger-2.6.22.orig/bin/mozilla/am.pl
sql-ledger-2.6.22/bin/mozilla/am.pl
--- sql-ledger-2.6.22.orig/bin/mozilla/am.pl 2006-11-22 13:26:09.000000000
-0500
+++ sql-ledger-2.6.22/bin/mozilla/am.pl 2007-08-29 20:59:37.000000000 -0400
@@ -2109,6 +2109,10 @@
<th align=right>|.$locale->text('Address').qq|</th>
<td><textarea name=address rows=4
cols=35>$myconfig{address}</textarea></td>
</tr>
+ <tr>
+ <th align=right>|.$locale->text('Website').qq|</th>
+ <td><input name=website size=35 value="$myconfig{website}"></td>
+ </tr>
</table>
</td>
<td>
diff -uNr sql-ledger-2.6.22.orig/bin/mozilla/io.pl
sql-ledger-2.6.22/bin/mozilla/io.pl
--- sql-ledger-2.6.22.orig/bin/mozilla/io.pl 2006-11-13 17:17:35.000000000
-0500
+++ sql-ledger-2.6.22/bin/mozilla/io.pl 2007-08-29 21:02:02.000000000 -0400
@@ -1372,12 +1372,12 @@
push @a, ("${inv}number", "${inv}date", "${due}date");
- for (qw(company address tel fax businessnumber)) { $form->{$_} =
$myconfig{$_} }
+ for (qw(company address website tel fax businessnumber)) { $form->{$_} =
$myconfig{$_} }
$form->{address} =~ s/\\n/\n/g;
for (qw(name email)) { $form->{"user$_"} = $myconfig{$_} }
- push @a, qw(company address tel fax businessnumber username useremail);
+ push @a, qw(company address website tel fax businessnumber username
useremail);
for (qw(notes intnotes)) { $form->{$_} =~ s/^\s+//g }
