From 52ae6bfe10659b65fe3bf877d72b33151bd02c14 Mon Sep 17 00:00:00 2001 From: "carpentry-heartbeat[bot]" Date: Mon, 25 May 2026 14:14:32 +0200 Subject: [PATCH] fix doc annotation for search-path-separator? and remove stale TODO --- path.carp | 4 ++-- test/path.carp | 1 - 2 files changed, 2 insertions(+), 3 deletions(-) diff --git a/path.carp b/path.carp index 7fdc0de..f7a7e44 100644 --- a/path.carp +++ b/path.carp @@ -48,8 +48,8 @@ As such, it is the inverse to [absolute?](#absolute?).") (doc separator? "checks whether the character `c` is a path separator on this OS.") (defn separator? [c] (Array.contains? &separators c)) - (doc separator? "checks whether the character `c` is a separator for the -`PATH` environment variable on this OS.") + (doc search-path-separator? "checks whether the character `c` is a separator +for the `PATH` environment variable on this OS.") (defn search-path-separator? [c] (= search-path-separator c)) (doc path-max "defines the maximum path length on this OS.") diff --git a/test/path.carp b/test/path.carp index 55b6b29..358e495 100644 --- a/test/path.carp +++ b/test/path.carp @@ -16,7 +16,6 @@ "add-extension works") (assert-equal test "/path" &(basename "/path/file.txt") "basename works") (assert-true test (Maybe.just? &(cwd)) "cwd works") - ; TODO why does this test not work? (assert-equal test "file" &(drop-extension "file.txt")