make Time::HiRes optional

inmyfree · May 7, 2014 · 8e915ff · 8e915ff
1 parent 0a2e038
commit 8e915ff
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/src/lib/Gitolite/Common.pm b/src/lib/Gitolite/Common.pm
@@ -71,9 +71,12 @@ sub dd {
 }
 
 {
-    use Time::HiRes;
     my %start_times;
 
+    eval "require Time::HiRes";
+    # we just ignore any errors from this; nothing needs to be done as long as
+    # no code *calls* either of the next two functions.
+
     sub t_start {
         my $name = shift || 'default';
         $start_times{$name} = [ Time::HiRes::gettimeofday() ];