changeset 24334:c56b72e5f29d

(Fbase64_encode_string): New optional argument `NO_LINE_BREAK'.
author Kenichi Handa <handa@m17n.org>
date Wed, 17 Feb 1999 08:12:31 +0000
parents 03cf9e15c988
children 0c4688f9a396
files src/fns.c
diffstat 1 files changed, 6 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/src/fns.c	Wed Feb 17 02:23:44 1999 +0000
+++ b/src/fns.c	Wed Feb 17 08:12:31 1999 +0000
@@ -2897,9 +2897,11 @@
 }
 
 DEFUN ("base64-encode-string", Fbase64_encode_string, Sbase64_encode_string,
-       1, 1, 0,
-       "Base64-encode STRING and return the result.")
-     (string)
+       1, 2, 0,
+       "Base64-encode STRING and return the result.\n\
+Optional second argument NO-LINE-BREAK means do not break long lines\n\
+into shorter lines.")
+     (string, no_line_break)
      Lisp_Object string;
 {
   int allength, length, encoded_length;
@@ -2918,7 +2920,7 @@
     encoded = (char *) xmalloc (allength);
 
   encoded_length = base64_encode_1 (XSTRING (string)->data,
-				    encoded, length, 0);
+				    encoded, length, NILP (no_line_break));
   if (encoded_length > allength)
     abort ();