FlattenToForm: in Rechnungen Positions-reqdate als reqdate & deliverydate_oe bereitst...
[kivitendo-erp.git] / SL / Webdav / VersionScheme / Timestamp.pm
1 package SL::Webdav::VersionScheme::Timestamp;
2
3 use strict;
4 use parent qw(Rose::Object);
5
6 use POSIX;
7
8 sub separator { "_" }
9
10 sub extract_regexp { qr/\d{8}_\d{6}/ }
11
12 sub cmp { sub { $_[0]->version cmp $_[1]->version } }
13
14 sub first_version { goto &get_current_formatted_time }
15
16 sub next_version { goto &get_current_formatted_time }
17
18 sub keep_last_version {
19   0;
20 }
21
22 sub get_current_formatted_time {
23   return POSIX::strftime('%Y%m%d_%H%M%S', localtime());
24 }
25
26 1;