From d74e9130234f23be84d0d8b34552587f9d2f53d2 Mon Sep 17 00:00:00 2001
From: Thomas Hintz <t@thintz.com>
Date: Fri, 24 Jul 2026 12:28:35 -0700
Subject: [PATCH] Fixing nextcloud validation.

---
 src/nassella.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/nassella.scm b/src/nassella.scm
index 8c77a1b..75c94df 100644
--- a/src/nassella.scm
+++ b/src/nassella.scm
@@ -1046,7 +1046,7 @@ chmod -R 777 /opt/keys")))
 ;; guessed at the length
 (define (valid-nextcloud-user? v)
   (if (string? v)
-      (irregex-match? (irregex "[a-zA-Z0-9-_\\. @]{1,64}") v)
+      (irregex-match? (irregex "[a-zA-Z0-9\\-_\\. @]{1,64}") v)
       #f))
 
 ;; Seems to be few restrictions other than a default that it should