#include	"stdio.h"
#include	"ed.h"

/*
 * Ask for a file name, and write the
 * contents of the current buffer to that file.
 * Update the remembered file name and clear the
 * buffer changed flag. This handling of file names
 * is different from the earlier versions, and
 * is more compatable with Gosling EMACS than
 * with ITS EMACS. Bound to "C-X C-W".
 */
ovmain(x, f, n)
{
	register int	s;
	char		fname[NFILEN];

	if (( s = mlreply( "Write file: ", fname, NFILEN )) != TRUE )
		return (s);
	return ( writeout( fname ));
}
#include "writeout.c"