add missing import

Netdisco/lib/App/Netdisco/Util/Device.pm

@@ -171,17 +171,14 @@ Regular Expression in YAML format which will match the device DNS name, e.g.:
 
 =item *
 
-C<"model:regex"> - matched against the device model
+C<"property:regex"> - matched against a device property, such as C<model> or C<vendor>
-
-=item *
-
-C<"vendor:regex"> - matched against the device vendor
 
 =back
 
-To simply match all devices, use "C<any>" or IP Prefix "C<0.0.0.0/0>". All
+To simply match all devices, use "C<any>" or IP Prefix "C<0.0.0.0/0>".
-regular expressions are anchored (that is, they must match the whole string).
+Property regular expressions are anchored (that is, they must match the whole
-To match no devices we recommend an entry of "C<localhost>" in the setting.
+string). To match no devices we recommend an entry of "C<localhost>" in the
+setting.
 
 =cut
 
@@ -225,17 +222,14 @@ Regular Expression in YAML format which will match the device DNS name, e.g.:
 
 =item *
 
-C<"model:regex"> - matched against the device model
+C<"property:regex"> - matched against a device property, such as C<model> or C<vendor>
-
-=item *
-
-C<"vendor:regex"> - matched against the device vendor
 
 =back
 
-To simply match all devices, use "C<any>" or IP Prefix "C<0.0.0.0/0>". All
+To simply match all devices, use "C<any>" or IP Prefix "C<0.0.0.0/0>".
-regular expressions are anchored (that is, they must match the whole string).
+Property regular expressions are anchored (that is, they must match the whole
-To match no devices we recommend an entry of "C<localhost>" in the setting.
+string). To match no devices we recommend an entry of "C<localhost>" in the
+setting.
 
 =cut
 

Netdisco/lib/App/Netdisco/Util/Permission.pm

@@ -5,6 +5,7 @@ use Dancer::Plugin::DBIC 'schema';
 
 use Scalar::Util 'blessed';
 use NetAddr::IP::Lite ':lower';
+use App::Netdisco::Util::DNS 'hostname_from_ip';
 
 use base 'Exporter';
 our @EXPORT = ();