fix typo, detect claws in alt dir
authorRicardo Mones <ricardo@mones.org>
Thu, 20 Dec 2007 17:24:56 +0000 (17:24 +0000)
committerRicardo Mones <ricardo@mones.org>
Thu, 20 Dec 2007 17:24:56 +0000 (17:24 +0000)
ChangeLog
README
VERSION
clawsker

index 2adb57a..d711f5c 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,11 @@
+2007-12-20 18:22  mones   0.2.0svn28
+
+       * clawsker
+               Detect running Claws Mail in alternate dir when
+               option --alternate-config-dir is given
+       * README
+               Fix typo
+
 2007-12-19 11:57  mones   0.2.0
 
        * VERSION
diff --git a/README b/README
index 79ceee5..3d6042e 100644 (file)
--- a/README
+++ b/README
@@ -51,7 +51,7 @@ Optionally you can provide also a DESTDIR as a root tree for the installation.
 Contributing
 ------------
 
-Patches, and specially, new translations (or updates to th existing) are
+Patches, and specially, new translations (or updates to the existing) are
 welcome.
 
 To create a new translation just change to 'po' directory, copy 'clawsker.pot'
diff --git a/VERSION b/VERSION
index 0ea3a94..3561461 100644 (file)
--- a/VERSION
+++ b/VERSION
@@ -1 +1 @@
-0.2.0
+0.2.0svn28
index 0378514..33cff42 100755 (executable)
--- a/clawsker
+++ b/clawsker
@@ -43,7 +43,9 @@ option specifications may produce weird results (but otherwise correct).
        
 =head1 LIMITATIONS
 
-Alternate configuration directories are not (yet) supported.
+A running Claws Mail cannot be detected if using the --clawsrc option because
+the directory is not assumed to be a Claws Mail configuration dir. If that is 
+the case the --alternate-config-dir option instead.
 
 =head1 AUTHOR
 
@@ -201,6 +203,7 @@ my %PREFS = ();
 # values of all preferences handled by clawsker
 my %HPVALUE = ();
 # default config dir and file name
+my $ALTCONFIGDIR = FALSE;
 my $CONFIGDIR = $ENV{HOME} . '/.claws-mail/';
 my $CONFIGRC = 'clawsrc';
 
@@ -288,7 +291,8 @@ sub set_rc_filename {
 }
 
 sub check_claws_not_running() {
-    my $socket = "/tmp/claws-mail-$<";
+    my $socket = ($ALTCONFIGDIR)? "/tmp/": $CONFIGDIR;
+    $socket .= "claws-mail-$<";
     -S $socket and die "$xl::s{e_error}$xl::s{e_running}\n";
 }
 
@@ -789,6 +793,7 @@ sub parse_command_line() {
                die "$xl::s{e_error}$xl::s{e_notadir}\n" 
                    unless -d $ARGV[$arg];
                $CONFIGDIR = $ARGV[$arg];
+               $ALTCONFIGDIR = TRUE;
                last;
            };
            /--clawsrc/ && do {