Sorry for replying to my own mail again,

but there's a stupid typo in here. The function is called
`org-publish-get-set'. 

Instead of 

  > +	(org-publish-cache-put filename (list property default)))

it should be

  > +	(org-publish-cache-get filename (list property default)))


Corrected patch: