X-Git-Url: https://git.distorted.org.uk/~mdw/odin-cgi/blobdiff_plain/fc8074b35d1b16d35726247fcc0dc86d59b83a3a..cc346ee1adf852ba0f4322bc04a78ec64206d37a:/bin/shorturl.userv diff --git a/bin/shorturl.userv b/bin/shorturl.userv index edad9f6..3bb1c8a 100755 --- a/bin/shorturl.userv +++ b/bin/shorturl.userv @@ -4,7 +4,6 @@ use lib "lib"; use Odin; use DBI; -use POSIX; Odin::cmdline_who; @@ -27,8 +26,7 @@ EOF FROM odin_shorturl WHERE owner = ? ORDER BY stamp", undef, $Odin::WHO)}) { my ($tag, $stamp, $url) = @$r; - my $t = strftime "%Y-%m-%d %H:%M:%S %z", localtime $stamp; - printf "%-25s %-12s %s\n", $t, $tag, $url; + Odin::print_columns Odin::fmt_time $stamp => 25, $tag => 12, $url =>0; } } elsif ($op eq "new") { @ARGV == 1 or Odin::fail "usage: new URL";