From 4507f247da15230c8aa653dad8d0349523a29fee Mon Sep 17 00:00:00 2001
From: Tom Willemse
Date: Mon, 9 Feb 2026 12:10:10 -0800
Subject: oni-php/snippets/namespace: Don't capitalize already capitalized

If a part of the directory tree is already capitalized a certain way, don't
capitalize it.
---
 oni-php/snippets/php-mode/namespace | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'oni-php')

diff --git a/oni-php/snippets/php-mode/namespace b/oni-php/snippets/php-mode/namespace
index a63d713..01abd02 100644
--- a/oni-php/snippets/php-mode/namespace
+++ b/oni-php/snippets/php-mode/namespace
@@ -2,4 +2,8 @@
 # name: namespace
 # key: ns
 # --
-namespace ${1:`(string-join (mapcar #'capitalize (cdr (split-string (directory-file-name (file-name-directory (file-relative-name buffer-file-name (project-root (project-current))))) "/"))) "\\")`};
\ No newline at end of file
+namespace ${1:`(string-join
+ (mapcar
+  (lambda (s) (let ((case-fold-search nil)) (if (string-match-p (rx upper-case) s) s (capitalize s))))
+  (cdr (split-string (directory-file-name (file-name-directory (file-relative-name buffer-file-name (project-root (project-current))))) "/")))
+ "\\")`};
\ No newline at end of file
-- 
cgit v1.3-2-g0d8e