version 1.20, 2014/02/17 16:40:22
|
version 1.21, 2014/02/28 19:24:03
|
Line 197 sub newEntry() {
|
Line 197 sub newEntry() {
|
my $date = gmtime(); |
my $date = gmtime(); |
# Create Entry-Object |
# Create Entry-Object |
my $entry = Entry->new(title => $title, path => $path, note => $note, date => $date); |
my $entry = Entry->new(title => $title, path => $path, note => $note, date => $date); |
# Create Tree-Object, this correspones a node in the wishlist-tree |
# Create Tree-Object, this corresponds a node in the wishlist-tree |
my $tree = Tree->new($entry); |
my $tree = Tree->new($entry); |
# Add this node to wishlist-tree |
# Add this node to wishlist-tree |
my $folderIndex = $env{'form.folders'}; |
my $folderIndex = $env{'form.folders'}; |