Fix typo in log message
This commit is contained in:
parent
3565109071
commit
b0070af1fd
1 changed files with 1 additions and 1 deletions
|
@ -117,7 +117,7 @@ variable (in that order). Raise an exception if the variable is not found."
|
||||||
(define-method (perform (a <act>) (c <connection>))
|
(define-method (perform (a <act>) (c <connection>))
|
||||||
(when (check-tags (act-tags a))
|
(when (check-tags (act-tags a))
|
||||||
(if (not (check-condition a c))
|
(if (not (check-condition a c))
|
||||||
(log-msg 'NOTICE "Skipping act " (act-name a) " (precondition not met")
|
(log-msg 'NOTICE "Skipping act " (act-name a) " (precondition not met)")
|
||||||
(begin
|
(begin
|
||||||
(log-msg 'NOTICE "Performing act " (act-name a))
|
(log-msg 'NOTICE "Performing act " (act-name a))
|
||||||
(dynamic-wind
|
(dynamic-wind
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue