FIXED: bin/note were missing. for whatever reason, I don't know.

This commit is contained in:
TLINDEN
2012-02-10 20:38:32 +01:00
parent f0a972af06
commit 060def0814
4 changed files with 15 additions and 9 deletions

View File

@@ -1,3 +1,6 @@
1.3.9:
FIXED: bin/note were missing. for whatever reason, I don't know.
================================================================================
1.3.8:
ADDED: New backend added: NOTEDB::pwsafe3, which adds support to store
notes in a Password Safe v3 database.

View File

@@ -10,7 +10,7 @@ package NOTEDB;
use Exporter ();
use vars qw(@ISA @EXPORT $crypt_supported);
$NOTEDB::VERSION = "1.32";
$NOTEDB::VERSION = "1.33";
BEGIN {
# make sure, it works, otherwise encryption

View File

@@ -1 +1 @@
1.3.8
1.3.9

View File

@@ -1,7 +1,7 @@
#!/usr/bin/perl
#
# note - console notes management with database and encryption support.
# Copyright (C) 1999-2009 Thomas Linden (see README for details!)
# Copyright (C) 1999-2012 Thomas Linden (see README for details!)
#
# This program is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License
@@ -140,7 +140,7 @@ $CONF = File::Spec->catfile($ENV{HOME}, ".noterc");
$USER = getlogin || getpwuid($<);
chomp $USER;
$TOPIC = 1;
$version = "1.3.6";
$version = "1.3.9";
$CurDepth = 1; # the current depth inside the topic "directory" structure...
$maxlen = "auto";
$timelen = 22;
@@ -212,7 +212,7 @@ else {
"longtopic|T!" => \$opt_T, # no arg
"list|l:s" => \$opt_l, # string, optional
"longlist|L:s" => \$opt_L, # string, optional
"dump||Dump|D:s" => \$opt_D, # string, optional
"dump|Dump|D:s" => \$opt_D, # string, optional
"import|Import|I:s" => \$opt_I, # string, optional
"overwrite|o!" => \$opt_o, # no arg
"help|h|?!" => \$opt_h, # no arg
@@ -254,7 +254,7 @@ else {
$number = $opt_e;
}
elsif ($opt_d) {
$mode = "delete";
$mode = "del";
$number = $opt_d;
}
elsif ($opt_enc) {
@@ -780,9 +780,9 @@ sub new {
}
sub add_ticket {
my $note = shift;
my $orignote = shift;
if ($conf{addticket}) {
my ($topic, $title, $rest) = split /\n/, $note, 3;
my ($topic, $title, $rest) = split /\n/, $orignote, 3;
my $note = "";
if ($topic =~ /^\//) {
# topic path, keep it
@@ -799,8 +799,11 @@ sub add_ticket {
$title = "[" . ticket() . "] " . $title;
}
$note .= "$title\n$rest";
return $note;
}
return $note;
else {
return $orignote;
}
}