summaryrefslogtreecommitdiff
path: root/zabbix.scm
diff options
context:
space:
mode:
Diffstat (limited to 'zabbix.scm')
-rw-r--r--zabbix.scm6
1 files changed, 3 insertions, 3 deletions
diff --git a/zabbix.scm b/zabbix.scm
index 618f796..ce81aab 100644
--- a/zabbix.scm
+++ b/zabbix.scm
@@ -134,8 +134,8 @@ newspace."
(remote-channels remote))))))
(('diff name)
(map (lambda (local remote)
- (if (string=? name (symbol->string (channel-name local)))
- (begin (display 0) (exit 1))
- (begin (display 1) (exit 0))))
+ (if (equal? local remote)
+ (begin (display 1) (exit 0))
+ (begin (display 0) (exit 1))))
(channels profile)
(remote-channels remote)))))