mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-05 11:45:45 +00:00
Code Issues Releases Activity

(Fbase64_encode_string): New optional argument `NO_LINE_BREAK'.

Browse Source
This commit is contained in:
Kenichi Handa 1999-02-17 08:12:31 +00:00
parent 02882bbce6
commit c22554ac39
1 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/fns.c
View File

@ -2897,9 +2897,11 @@ into shorter lines.")
}
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 @@ DEFUN ("base64-encode-string", Fbase64_encode_string, Sbase64_encode_string,
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 ();