summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--srfi/ChangeLog5
-rw-r--r--srfi/srfi-13.c2
2 files changed, 6 insertions, 1 deletions
diff --git a/srfi/ChangeLog b/srfi/ChangeLog
index 9e8779ccd..c207f9228 100644
--- a/srfi/ChangeLog
+++ b/srfi/ChangeLog
@@ -1,3 +1,8 @@
+2001-05-10 Martin Grabmueller <mgrabmue@cs.tu-berlin.de>
+
+ * srfi-13.c (scm_string_delete): Logic was inversed for charset.
+ Fixed.
+
2001-05-08 Martin Grabmueller <mgrabmue@cs.tu-berlin.de>
* srfi-13.c (scm_string_copyS): Fixed nasty bug.
diff --git a/srfi/srfi-13.c b/srfi/srfi-13.c
index 41adb596b..4b709781f 100644
--- a/srfi/srfi-13.c
+++ b/srfi/srfi-13.c
@@ -2995,7 +2995,7 @@ SCM_DEFINE (scm_string_delete, "string-delete", 2, 2, 0,
idx = cstart;
while (idx < cend)
{
- if (SCM_CHARSET_GET (char_pred, cstr[idx]))
+ if (!SCM_CHARSET_GET (char_pred, cstr[idx]))
ls = scm_cons (SCM_MAKE_CHAR (cstr[idx]), ls);
idx++;
}