Changeset 74 for FlickrPublicPhotos/trunk

Timestamp:

06/08/05 15:47:10 (4 years ago)

Author:

ogawa

Message:

Change the modified-time of a cached image if the response is "Not modified"

Files:

• FlickrPublicPhotos/trunk/FlickrPublicPhotos.pl (modified) (5 diffs)

FlickrPublicPhotos/trunk/FlickrPublicPhotos.pl

@@ -1 +1 @@
 # A plugin for adding "FlickrPublicPhotos" container and related tags
 #
-# Release 0.20 (May 26, 2005)
+# Release 0.21 (June 6, 2005)
 #
 # This software is provided as-is. You may use it for commercial or 
@@ -16 +16 @@
     $plugin = new MT::Plugin();
     $plugin->name("FlickrPublicPhotos Plugin");
-    $plugin->description("Add FlickrPublicPhotos container and related tags. Version 0.20");
+    $plugin->description("Add FlickrPublicPhotos container and related tags. Version 0.21");
     $plugin->doc_link("http://as-is.net/hacks/2005/05/flickrpublicphotos_plugin.html");
     MT->add_plugin($plugin);
@@ -51 +51 @@
     }
     my $data = $pd->data() || {};
+    my $now = time;
     if (!defined($data->{last_updated}) || !defined($data->{photos}) ||
-        (time - $data->{last_updated} >= $refresh)) {
+        ($now - $data->{last_updated} >= $refresh)) {
         my @photos = eval { load_photos_fapi($user); };
         # if FlickrAPI call fails, reuse cache
         if (!$@ || !defined($data->{photos})) {
             $data->{photos} = \@photos;
-            $data->{last_updated} = time;
+            $data->{last_updated} = $now;
         }
         $pd->data($data);
@@ -128 +129 @@
 
     my $mtime = 0;
+    my $now = time;
     if ($fmgr->exists($path)) {
         $mtime = (stat($path))[9];
-        return $site_url if ($refresh && (time - $mtime < $refresh));
+        return $site_url if ($refresh && ($now - $mtime < $refresh));
     }
 
@@ -144 +146 @@
         # put_data, and if can't return original url
         $fmgr->put_data($rsp->content, $path) or return $url;
-        return $site_url;
+        $url = $site_url;
     } elsif ($rsp->code == 304) { # not modified
-        return $site_url;
-    } else {
-        return $url;
-    }
+        utime $now, $now, $path; # touch it
+        $url = $site_url;
+    }
+    $url;
 }