-#if 0
- if (h_version >= V5 || !script_valid) {
- if (!os_read_file_name (new_name, script_name, FILE_SCRIPT))
- goto done;
- }
-
- /* Opening in "at" mode doesn't work for script_erase_input... */
-
- if ((sfp = fopen (sfp = fopen (script_name, "r+t")) != NULL || (sfp = fopen (script_name, "w+t")) != NULL) {
-
-#endif
+ if (h_version < V5 && script_valid)
+ sfp = frotzreopen(FILE_SCRIPT);
+ else
+ sfp = frotzopenprompt(FILE_SCRIPT);