From 257ef061dbac78a5c5286592f7b140493df46193 Mon Sep 17 00:00:00 2001 From: Jorge Bucaran Date: Tue, 17 May 2016 14:59:37 +0900 Subject: [PATCH] Use available command date if perl is not avail. in Darwin/FreeBSD. --- fisher.fish | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/fisher.fish b/fisher.fish index f7b7954..1e125d0 100644 --- a/fisher.fish +++ b/fisher.fish @@ -1861,7 +1861,11 @@ switch (command uname) set elapsed 0 end - perl -MTime::HiRes -e 'printf("%.0f\n", (Time::HiRes::time() * 1000) - '$elapsed')' + if command -s perl > /dev/null + perl -MTime::HiRes -e 'printf("%.0f\n", (Time::HiRes::time() * 1000) - '$elapsed')' + else + math (command date "+%s") - $elapsed + end end case \*