Hook up 'write'

Note: previously I used DB.View.create () when I think this should
have been DB.View.of_path t []

Signed-off-by: David Scott <dave.scott@citrix.com>