projects
/
kivitendo-erp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Erzeugnis nach Fertigen editieren -> Recht in template ausgelagert
[kivitendo-erp.git]
/
SL
/
File
/
Object.pm
diff --git
a/SL/File/Object.pm
b/SL/File/Object.pm
index
fd10528
..
7ac8706
100644
(file)
--- a/
SL/File/Object.pm
+++ b/
SL/File/Object.pm
@@
-31,10
+31,6
@@
sub file_type {
$_[0]->loaded_db_file->file_type;
}
$_[0]->loaded_db_file->file_type;
}
-sub file_name {
- $_[0]->loaded_db_file->file_name;
-}
-
sub object_type {
$_[0]->loaded_db_file->object_type;
}
sub object_type {
$_[0]->loaded_db_file->object_type;
}
@@
-101,6
+97,10
@@
sub delete_last_version {
SL::File->delete(dbfile => $_[0]->loaded_db_file, last => 1 )
}
SL::File->delete(dbfile => $_[0]->loaded_db_file, last => 1 )
}
+sub delete_version {
+ SL::File->delete(dbfile => $_[0]->loaded_db_file, version => $_[0]->version )
+}
+
sub purge {
SL::File->delete(dbfile => $_[0]->loaded_db_file, all_but_notlast => 1 )
}
sub purge {
SL::File->delete(dbfile => $_[0]->loaded_db_file, all_but_notlast => 1 )
}