diff --git a/perl/Gnome-Tomboy/.gitignore b/perl/Gnome-Tomboy/.gitignore
index 3d4185ad73c7d375cf05e74239073e7d86746aaa..79c2a7bc93e907aa52149fc4c7f775d892dd9883 100644
--- a/perl/Gnome-Tomboy/.gitignore
+++ b/perl/Gnome-Tomboy/.gitignore
@@ -4,3 +4,4 @@ tmp
 *.swp
 do_verify.sh
 typescript
+@*
diff --git a/perl/Gnome-Tomboy/lib/Tomboy/Directory.pm b/perl/Gnome-Tomboy/lib/Tomboy/Directory.pm
index 4762ccdd0134fad490f4fb92e4a8dd74396731af..6972cd6ff5a79267a4e39e4fa0ef9d126f0ae186 100644
--- a/perl/Gnome-Tomboy/lib/Tomboy/Directory.pm
+++ b/perl/Gnome-Tomboy/lib/Tomboy/Directory.pm
@@ -151,6 +151,7 @@ print __LINE__, " scan_dir: quick=[$quick]\n";
     unless (defined ($n))
     {
       print "ATTN: parsing [$fp] returned undefined note!\n";
+      print "caller: ", join (' ', caller()), "\n";
       next NOTE;
     }
     # print "n: ", main::Dumper ($n);
diff --git a/perl/Gnome-Tomboy/lib/Tomboy/Note/Simple.pm b/perl/Gnome-Tomboy/lib/Tomboy/Note/Simple.pm
index 72c118f663a4cecd937f4b7f1b4c0fc24a7fdbe1..7659b0b743f3f898f7762b76e32a2e0649033540 100755
--- a/perl/Gnome-Tomboy/lib/Tomboy/Note/Simple.pm
+++ b/perl/Gnome-Tomboy/lib/Tomboy/Note/Simple.pm
@@ -185,7 +185,7 @@ sub parse
      if (ref ($c) eq 'Tomboy::Note::Simple') { $note= $c; }
   elsif (ref ($c) eq '')
   {
-    # print "create new c=[$c]\n";
+    print "create new c=[$c] fnm=[$fnm]\n";
     $note= new Tomboy::Note::Simple;
   }
   else
@@ -203,6 +203,7 @@ sub parse
   if ($@)
   {
     print "parsefile failed fnm=[$fnm]:\n", $@, "\n";
+    print "caller: ", join (' ', caller()), "\n";
     return undef;
   }