Fix rest of PR 13054.

[pspp-builds.git] / src / expressions / evaluate.c

diff --git a/src/expressions/evaluate.c b/src/expressions/evaluate.c
index b7f665d49bc461ff2366700516fd43e88315d415..1607681604357b075e92ff2397ed99ca24c95f26 100644 (file)
--- a/src/expressions/evaluate.c
+++ b/src/expressions/evaluate.c
@@ -102,7 +102,7 @@ expr_evaluate_str (struct expression *e, const struct ccase *c, int case_idx,
   assert (e->type == OP_string);
   assert ((dst == NULL) == (dst_size == 0));
   expr_evaluate (e, c, case_idx, &s);
-  st_bare_pad_len_copy (dst, s.string, dst_size, s.length);
+  buf_copy_rpad (dst, dst_size, s.string, s.length);
 }
 \f
 #include "lexer.h"