projects
/
kivitendo-erp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
Fehler abfangen, wenn keine Beträge gebucht werden (leere Buchung)
[kivitendo-erp.git]
/
SL
/
Common.pm
diff --git
a/SL/Common.pm
b/SL/Common.pm
index
de1735f
..
33a6e2a
100644
(file)
--- a/
SL/Common.pm
+++ b/
SL/Common.pm
@@
-8,6
+8,17
@@
package Common;
+use Time::HiRes qw(gettimeofday);
+
+sub unique_id {
+ my ($a, $b) = gettimeofday();
+ return "${a}-${b}-${$}";
+}
+
+sub tmpname {
+ return "/tmp/lx-office-tmp-" . unique_id();
+}
+
sub retrieve_parts {
$main::lxdebug->enter_sub();