[bknr-cvs] hans changed trunk/projects/quickhoney/src/handlers.lisp

BKNR Commits bknr at bknr.net
Thu Sep 18 10:25:17 UTC 2008


Revision: 3919
Author: hans
URL: http://bknr.net/trac/changeset/3919

remove ffffound redirection again, as it does not work because of the caching.

U   trunk/projects/quickhoney/src/handlers.lisp

Modified: trunk/projects/quickhoney/src/handlers.lisp
===================================================================
--- trunk/projects/quickhoney/src/handlers.lisp	2008-09-18 10:18:19 UTC (rev 3918)
+++ trunk/projects/quickhoney/src/handlers.lisp	2008-09-18 10:25:17 UTC (rev 3919)
@@ -23,14 +23,6 @@
           (header-out :cache-control) "max-age=15"))
   (call-next-method))
 
-;;; redirect users coming from ffffound to the image page.
-(defmethod handle-object :before ((handler imageproc-handler) (image quickhoney-image))
-  (when (cl-ppcre:scan "^http://ffffound.com/image/" (hunchentoot:header-in* :referer))
-    (redirect (format nil "/~(~A/~A~)/~A"
-                      (quickhoney-image-category image)
-                      (quickhoney-image-subcategory image)
-                      (store-image-name image)))))
-
 (defclass random-image-handler (object-handler)
   ())
 




More information about the Bknr-cvs mailing list