From 5298ad1f8b498fbbc82ccfae7b1305458bbd0876 Mon Sep 17 00:00:00 2001
From: Alexander_Kabui
Date: Wed, 7 Aug 2024 17:51:45 +0300
Subject: Fix naming for predicates.

---
 web/webserver.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'web/webserver.scm')

diff --git a/web/webserver.scm b/web/webserver.scm
index ded9997..9f278be 100755
--- a/web/webserver.scm
+++ b/web/webserver.scm
@@ -179,7 +179,7 @@ otherwise search for set/group data"
       (let* ((post-data
               (decode-request-json body))
              (_ (for-each (lambda (target)
-                            (is-invalid-data?  post-data target)
+                            (invalid-data?  post-data target)
                             ) '("filename" "content" "username" "email" "prev_commit")))
              (file-name (assoc-ref post-data "filename"))
              (content  (assoc-ref post-data "content"))
-- 
cgit v1.2.3