From bb392fbb4beee89eaa5914191b3f58262f16d68b Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Wed, 10 Mar 2021 06:56:46 -0800
Subject: sort: bugfix: broken for vectors/strings.

* lib.c (sort): Return the copied and sorted object object,
not the original.
---
 lib.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib.c b/lib.c
index 72fe13f6..353a9614 100644
--- a/lib.c
+++ b/lib.c
@@ -9679,7 +9679,8 @@ val sort(val seq, val lessfun, val keyfun)
     return nil;
   case SEQ_VECLIKE:
   case SEQ_HASHLIKE:
-    sort_vec(copy(seq), lessfun, keyfun);
+    seq = copy(seq);
+    sort_vec(seq, lessfun, keyfun);
     return seq;
   case SEQ_LISTLIKE:
     return sort_list(copy_list(seq), lessfun, keyfun);
-- 
cgit v1.2.3