diff --git a/tcl/drivers/secop_4.tcl b/tcl/drivers/secop_4.tcl
index a6c5d97..23173bf 100644
--- a/tcl/drivers/secop_4.tcl
+++ b/tcl/drivers/secop_4.tcl
@@ -790,6 +790,7 @@ proc secop::update_ {} {
       set requesttype [string range $messagetype 6 end]
       if {$requesttype eq "change" && $path ne ""} {
         hsetprop $path changed 0
+        catch {hdelprop $path secoprequested}
       }
       lassign $sent_message sent_type sent_par
       if {$requesttype eq $sent_message && $par eq $sent_par} {