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);
 

Reply via email to