link-view: serve png files
%html (html-response:gen u.file)
%js (js-response:gen u.file)
%css (css-response:gen u.file)
+ %png (png-response:gen u.file)
==
::
++ get-file-at
^- (unit octs)
:: only expose html, css and js files for now
::
- ?. ?=(?(%html %css %js) ext)
+ ?. ?=(?(%html %css %js %png) ext)
~
=/ =path
:* (scot %p our.bowl)
