aboutsummaryrefslogtreecommitdiffhomepage
path: root/utilities.lisp
diff options
context:
space:
mode:
authorGrant Shangreaux <grant@unabridgedsoftware.com>2022-12-27 19:22:46 -0600
committerGrant Shangreaux <grant@unabridgedsoftware.com>2023-01-07 14:22:47 -0600
commit7a1e8d41ce96a7514adb31529f05aaed6a13c259 (patch)
tree0526cfea392394a9c8e1d51e37c1565877f10f46 /utilities.lisp
parent3f7990b73a0a5c72550b34400270615771fffed8 (diff)
Clean: zipper.lisp implementation and defuns, fewer iterations
Diffstat (limited to 'utilities.lisp')
-rw-r--r--utilities.lisp3
1 files changed, 3 insertions, 0 deletions
diff --git a/utilities.lisp b/utilities.lisp
index 1ed13a3..0e258b6 100644
--- a/utilities.lisp
+++ b/utilities.lisp
@@ -127,3 +127,6 @@
(if (apply pred args)
(apply then args)
(apply else args))))
+
+(defun clean-slashes (str)
+ (cl-ppcre:regex-replace-all "/" str "-"))