diff --git a/Netdisco/Changes b/Netdisco/Changes
index 90dd86f3..1505b68c 100644
--- a/Netdisco/Changes
+++ b/Netdisco/Changes
@@ -1,3 +1,13 @@
+2.022000
+
+  [NEW FEATURES]
+
+  * 
+
+  [BUG FIXES]
+
+  * [#85] device property in _no/_only fails with error (R. Kerr)
+
 2.021001
 
   [NEW FEATURES]
diff --git a/Netdisco/lib/App/Netdisco/Util/Device.pm b/Netdisco/lib/App/Netdisco/Util/Device.pm
index bb5f78be..64ca06d9 100644
--- a/Netdisco/lib/App/Netdisco/Util/Device.pm
+++ b/Netdisco/lib/App/Netdisco/Util/Device.pm
@@ -92,7 +92,7 @@ sub check_acl {
 
           # lazy version of vendor: and model:
           if ($device->can($prop) and defined $device->prop
-              and $device->prop =~ m/^$match$/) {
+              and $device->$prop =~ m/^$match$/) {
               return 1;
           }