From 66cc08fd87ac624ff4eccc4e5e583f9a998174c7 Mon Sep 17 00:00:00 2001
From: Elijah Perrault <elijah@starcoder.info>
Date: Sun, 27 Feb 2011 16:18:38 -0700
Subject: [PATCH] Use fpfmt here.

---
 lib/API/Log.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/API/Log.pm b/lib/API/Log.pm
index 465505f..a7ffd79 100644
--- a/lib/API/Log.pm
+++ b/lib/API/Log.pm
@@ -10,7 +10,7 @@ use POSIX;
 use Time::Local;
 use Exporter;
 use base qw(Exporter);
-use API::Std qw(conf_get);
+use API::Std qw(conf_get fpfmt);
 
 our @EXPORT_OK = qw(println dbug alog slog);
 
@@ -85,7 +85,7 @@ sub expire_logs
     }
 
     # Iterate through each logfile.
-    foreach my $file (glob "$Auto::Bin/../var/*") {
+    foreach my $file (glob fpfmt("$Auto::Bin/../var/*")) {
     	my (undef, $file) = split 'bin/../var/', $file; ## no critic qw(BuiltinFunctions::ProhibitStringySplit)
 
     	# Convert filename to UNIX time.