summaryrefslogtreecommitdiffstats
path: root/txr.1
diff options
context:
space:
mode:
Diffstat (limited to 'txr.1')
-rw-r--r--txr.127
1 files changed, 14 insertions, 13 deletions
diff --git a/txr.1 b/txr.1
index ba96ae34..643b0e9d 100644
--- a/txr.1
+++ b/txr.1
@@ -57204,10 +57204,11 @@ in more detail below.
If a suffix delimiter is present, then the long or short suffix is the
substring of
.meta path
-consisting of all the characters which follow the delimiting period,
-exclusive of
-.metn path 's
-trailing path separator, if any.
+which includes the delimiting period and all characters which follow,
+except that if the last character of
+.meta path
+is a path separator character, that character is omitted from the
+returned suffix.
If multiple periods occur in the last component of the path,
the delimiter for the long suffix is the leftmost period;
@@ -57242,11 +57243,11 @@ extracted from this last component.
(short-suffix ".abc") -> nil
(short-suffix "/.abc") -> nil
(short-suffix "abc" "") -> ""
- (short-suffix "abc.") -> ""
- (short-suffix "abc.tar") -> "tar"
- (short-suffix "abc.tar.gz") -> "gz"
- (short-suffix "abc.tar.gz/") -> "gz"
- (short-suffix "x.y.z/abc.tar.gz/") -> "gz"
+ (short-suffix "abc.") -> "."
+ (short-suffix "abc.tar") -> ".tar"
+ (short-suffix "abc.tar.gz") -> ".gz"
+ (short-suffix "abc.tar.gz/") -> ".gz"
+ (short-suffix "x.y.z/abc.tar.gz/") -> ".gz"
(short-suffix "x.y.z/abc.tar.gz//") -> nil
(long-suffix "") -> nil
@@ -57255,10 +57256,10 @@ extracted from this last component.
(long-suffix ".abc") -> nil
(long-suffix "/.abc") -> nil
(long-suffix "abc.") -> ""
- (long-suffix "abc.tar") -> "tar"
- (long-suffix "abc.tar.gz") -> "tar.gz"
- (long-suffix "abc.tar.gz/") -> "tar.gz"
- (long-suffix "x.y.z/abc.tar.gz/") -> "tar.gz"
+ (long-suffix "abc.tar") -> ".tar"
+ (long-suffix "abc.tar.gz") -> ".tar.gz"
+ (long-suffix "abc.tar.gz/") -> ".tar.gz"
+ (long-suffix "x.y.z/abc.tar.gz/") -> ".tar.gz"
.brev
.coNP Function @ path-cat