+++ /dev/null
-#!/usr/bin/perl
-use t::lib tests => 1;
-
-my $tree = mktree 't/html/hashmap.html';
-$tree->hash_map(
- hash => {people_id => 888, phone => '444-4444', email => 'm@xml.com'},
- to_attr => 'sid',
- excluding => ['email']
-);
-isxml $tree, 't/html/hashmap.exp', 'hash_map';