Package: tinyca
Version: 0.7.5-2
Severity: wishlist
Tinyca always places files in $HOME/.TinyCA it is hard coded. I have
attached a patch to look for env variables TINYCABASEDIR
TINYCAEXPORTDIR, if these are not found default back to the original
values
-- System Information:
Debian Release: lenny/sid
APT prefers testing
APT policy: (500, 'testing'), (500, 'stable'), (100, 'unstable'), (50,
'experimental')
Architecture: amd64 (x86_64)
Kernel: Linux 2.6.22-2-amd64 (SMP w/2 CPU cores)
Locale: LANG=en_AU, LC_CTYPE=en_AU (charmap=ISO-8859-1)
Shell: /bin/sh linked to /bin/dash
Versions of packages tinyca depends on:
ii libgtk2-perl 1:1.140-1 Perl interface to the 2.x series o
ii liblocale-gettext-perl 1.05-1 Using libc functions for internati
ii openssl 0.9.8g-1 Secure Socket Layer (SSL) binary a
Versions of packages tinyca recommends:
ii zip 2.32-1 Archiver for .zip files
-- no debconf information
diff -Nru a/tinyca2 b/tinyca2
--- a/tinyca2 2007-12-05 14:38:25.000000000 +1100
+++ b/tinyca2 2007-12-05 14:44:05.000000000 +1100
@@ -85,8 +85,17 @@
}
# location for CA files
-$init->{'basedir'} = $ENV{HOME}."/.TinyCA";
-$init->{'exportdir'} = $ENV{HOME};
+if( exists $ENV{'TINYCABASEDIR'}) {
+ $init->{'basedir'} = $ENV{'TINYCABASEDIR'}
+} else {
+ $init->{'basedir'} = $ENV{HOME}."/.TinyCA";
+}
+
+if( exists $ENV{'TINYCAEXPORTDIR'}) {
+ $init->{'exportdir'} = $ENV{'TINYCAEXPORTDIR'};
+} else {
+ $init->{'exportdir'} = $ENV{HOME};
+}
umask(0077);