/*
 *  call-seq:
 *  	file.remove_attr(attribute)
 *
 *  Removes <i>attribute</i> from the file
 *
 *  	File.new(__FILE__).remove_attr("description")
 *
 */

VALUE rb_file_remove_attrf(fobj, aname)
	VALUE fobj, aname;
{
	int ret;
	OpenFile *fptr;
	FILE *f;

	GetOpenFile(fobj, fptr);
	f = GetReadFile(fptr);

	Check_Type(fobj, T_FILE);
	Check_Type(aname, T_STRING);

	ret = attr_removef(fileno(f), StringValueCStr(aname), 1);
	if (ret != 0)
		rb_sys_fail("");
	return 1;
}