diff options
| author | Guenter Geiger <ggeiger@users.sourceforge.net> | 2004-02-22 16:00:02 +0000 |
|---|---|---|
| committer | Guenter Geiger <ggeiger@users.sourceforge.net> | 2004-02-22 16:00:02 +0000 |
| commit | 4af95e6d1963e319ed6bb1681a332ad654bdd1ef (patch) | |
| tree | 63d42c0e25f0ad84963a0a0c264a93251cbea7a8 /pd/src/s_main.c | |
| parent | 74e28b058aaf629d94ad7d44a9add3062e89441d (diff) | |
merged in version 0.37-1test6
svn path=/trunk/; revision=1329
Diffstat (limited to 'pd/src/s_main.c')
| -rw-r--r-- | pd/src/s_main.c | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/pd/src/s_main.c b/pd/src/s_main.c index 9f038259..cc8bcc20 100644 --- a/pd/src/s_main.c +++ b/pd/src/s_main.c @@ -7,7 +7,7 @@ * 1311:forum::für::umläute:2001 */ -char pd_version[] = "Pd version 0.37.1 TEST6 devel\n"; +char pd_version[] = "Pd version 0.37.1 TEST6\n"; char pd_compiletime[] = __TIME__; char pd_compiledate[] = __DATE__; @@ -51,6 +51,7 @@ static t_namelist *sys_externlist; static t_namelist *sys_openlist; static t_namelist *sys_messagelist; static int sys_version; +int sys_oldtclversion; /* hack to warn g_rtext.c about old text sel */ int sys_nmidiout = 1; #ifdef MSW @@ -182,7 +183,7 @@ void glob_initfromgui(void *dummy, t_symbol *s, int argc, t_atom *argv) char *cwd = atom_getsymbolarg(0, argc, argv)->s_name; t_namelist *nl; unsigned int i, j; - if (argc != 1 + 3 * NHOSTFONT) bug("glob_initfromgui"); + if (argc != 2 + 3 * NHOSTFONT) bug("glob_initfromgui"); for (i = 0; i < NFONT; i++) { int wantheight = sys_fontlist[i].fi_maxheight; @@ -226,6 +227,7 @@ void glob_initfromgui(void *dummy, t_symbol *s, int argc, t_atom *argv) } namelist_free(sys_messagelist); sys_messagelist = 0; + sys_oldtclversion = atom_getfloatarg(1 + 3 * NHOSTFONT, argc, argv); } static void sys_afterargparse(void); |