/*
 *  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;
}