|
|
| version 1.13, 2025/04/02 03:26:22 | version 1.14, 2025/04/02 04:50:49 |
|---|---|
| Line 24 | Line 24 |
| * along with FreeM. If not, see <https://www.gnu.org/licenses/>. | * along with FreeM. If not, see <https://www.gnu.org/licenses/>. |
| * | * |
| * $Log$ | * $Log$ |
| * Revision 1.14 2025/04/02 04:50:49 snw | |
| * Allow vendor routines to be upgraded | |
| * | |
| * Revision 1.13 2025/04/02 03:26:22 snw | * Revision 1.13 2025/04/02 03:26:22 snw |
| * Don't corrupt the terminal if FreeM runs before fmadm configure has been run | * Don't corrupt the terminal if FreeM runs before fmadm configure has been run |
| * | * |
| Line 647 int main (int argc, char **argv, char ** | Line 650 int main (int argc, char **argv, char ** |
| strncpy (nsnbuf, nsname, 255); | strncpy (nsnbuf, nsname, 255); |
| if (init (nsnbuf) == FALSE) { | if (init (nsnbuf) == FALSE) { |
| set_io (UNIX); | if (fm_initialized) set_io (UNIX); |
| fprintf (stderr, "\nError initializing FreeM.\n"); | fprintf (stderr, "\nError initializing FreeM.\n"); |
| exit (1); | exit (1); |
| Line 682 int main (int argc, char **argv, char ** | Line 685 int main (int argc, char **argv, char ** |
| /* isolate the path from the routine file */ | /* isolate the path from the routine file */ |
| strncpy (cli_rtn_path, argv[optind], strrchr (argv[optind], '/') - argv[optind]); | strncpy (cli_rtn_path, argv[optind], strrchr (argv[optind], '/') - argv[optind]); |
| /* set_io (UNIX); | |
| printf ("cli_rtn_name = '%s' cli_rtn_path = '%s'\n", cli_rtn_name, cli_rtn_path); | |
| set_io (MUMPS); | |
| */ | |
| } | } |
| /* do we have a file extension? */ | /* do we have a file extension? */ |