From: Don Armstrong <don@donarmstrong.com>
Date: Sun, 12 Oct 2008 23:23:08 +0000 (+0000)
Subject:  * tweak stodo output more
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=c2b5c0655e83bc662345bc7e022207756f847115;p=bin.git

 * tweak stodo output more
---

diff --git a/stodo b/stodo
index 9534404..2c4f6de 100755
--- a/stodo
+++ b/stodo
@@ -110,19 +110,20 @@ if ($tododb !~ m#^/#) {
      $tododb = cwd().'/'.$tododb;
 }
 if (not -r $tododb) {
-     "$tododb does not exist or is not readable";
+     print STDERR "Todo DB '$tododb' does not exist or is not readable\n";
+     exit 1;
 }
 $tododb = full_readlink($tododb);
 my $base_dir = dirname($tododb);
 my $tododb_name = basename($tododb);
 
 if (not -e "$base_dir/.svn") {
-     print "$base_dir/.svn doesn't exist, not commiting\n" unless $options{quiet};
+     print STDERR "$base_dir/.svn doesn't exist, not commiting\n" unless $options{quiet};
      exit 0;
 }
 
 if (not -e "$base_dir/.svn/text-base/${tododb_name}.svn-base") {
-     print "$base_dir/.svn/text-base/${tododb_name}.svn-base doesn't exist, not committing\n" unless $options{quiet};
+     print STDERR "$base_dir/.svn/text-base/${tododb_name}.svn-base doesn't exist, not committing\n" unless $options{quiet};
      exit 0;
 }
 
@@ -139,7 +140,7 @@ while (<$svn_entries_fh>) {
      last;
 }
 if ($ENV{STODO_NO_COMMIT}) {
-     print "Exiting because of STODO_NO_COMMIT env variable\n" unless $options{quiet};
+     print STDERR "Exiting because of STODO_NO_COMMIT env variable\n" unless $options{quiet};
      exit 0;
 }
 if (not defined $svn_host and (not defined $url_type or $url_type ne 'file')) {