X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=modules%2Fbase64%2Fbase64.c;h=2c5bac12c7df240b4df087e1554bbd48138ffe21;hb=f540c618471e65b9d6bcd57794be5ebfa6633201;hp=b65625fb2266145c2b1c7285c3bd50a4affc713f;hpb=6883ee56ec887c2c48abe5b06b5e66aa74031910;p=chise%2Fxemacs-chise.git-

diff --git a/modules/base64/base64.c b/modules/base64/base64.c
index b65625f..2c5bac1 100644
--- a/modules/base64/base64.c
+++ b/modules/base64/base64.c
@@ -1,5 +1,5 @@
 /* base64 interface for XEmacs.
-   Copyright (C) 1998 Free Software Foundation, Inc.
+   Copyright (C) 1998, 1999 Free Software Foundation, Inc.
 
 This file is part of XEmacs.
 
@@ -22,15 +22,7 @@ Boston, MA 02111-1307, USA.  */
 
 /* Author: William Perry <wmperry@aventail.com> */
 
-#include <config.h>
-
-#include "lisp.h"
-#include "buffer.h"
-#include "insdel.h"
-#include "lstream.h"
-#ifdef FILE_CODING
-#include "file-coding.h"
-#endif
+#include <emodules.h>
 
 unsigned char alphabet[64] = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
 
@@ -74,7 +66,7 @@ determined.  Else assume binary coding if all else fails.
 	/* set up the in stream */
 	if (BUFFERP (object))
 	{
-		struct buffer *b = decode_buffer (object, 1);
+		struct buffer *b = XBUFFER (object);
 		Bufpos begv, endv;
 		/* Figure out where we need to get info from */
 		get_buffer_range_char (b, start, end, &begv, &endv, GB_ALLOW_NIL);
@@ -264,7 +256,7 @@ determined.  Else assume binary coding if all else fails.
 	/* set up the in stream */
 	if (BUFFERP (object))
 	{
-		struct buffer *b = decode_buffer (object, 1);
+		struct buffer *b = XBUFFER (object);
 		Bufpos begv, endv;
 		/* Figure out where we need to get info from */
 		get_buffer_range_char (b, start, end, &begv, &endv, GB_ALLOW_NIL);
@@ -416,14 +408,14 @@ determined.  Else assume binary coding if all else fails.
 }
 
 void
-syms_of (void)
+syms_of_base64 (void)
 {
   DEFSUBR(Fbase64_encode);
   DEFSUBR(Fbase64_decode);
 }
 
 void
-vars_of (void)
+vars_of_base64 (void)
 {
   Fprovide (intern ("base64"));
 }