Mercurial > hg > xemacs-beta
comparison src/emacs.c @ 288:e11d67e05968 r21-0b42
Import from CVS: tag r21-0b42
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:35:54 +0200 |
parents | 57709be46d1b |
children | 70ad99077275 |
comparison
equal
deleted
inserted
replaced
287:13a0bd77a29d | 288:e11d67e05968 |
---|---|
1570 an interactive run (redisplay, user input, etc.) and stuff that is | 1570 an interactive run (redisplay, user input, etc.) and stuff that is |
1571 not needed until we start loading Lisp code (the reader). A lot | 1571 not needed until we start loading Lisp code (the reader). A lot |
1572 of this stuff involves querying the current environment and needs | 1572 of this stuff involves querying the current environment and needs |
1573 to be done both at dump time and at run time. */ | 1573 to be done both at dump time and at run time. */ |
1574 | 1574 |
1575 init_initial_directory(); /* get the directory to use for the | |
1576 "*scratch*" buffer, etc. */ | |
1577 | |
1578 #ifdef WINDOWSNT | |
1579 /* | |
1580 * For Win32, call init_environment() now, so that environment/registry | |
1581 * variables will be properly entered into Vprocess_envonment. | |
1582 */ | |
1583 init_environment(); | |
1584 #endif | |
1585 | |
1575 init_callproc (); /* Set up the process environment (so that egetenv | 1586 init_callproc (); /* Set up the process environment (so that egetenv |
1576 works), the basic directory variables | 1587 works), the basic directory variables |
1577 (exec-directory and so on), and stuff | 1588 (exec-directory and so on), and stuff |
1578 related to subprocesses. This should be | 1589 related to subprocesses. This should be |
1579 first because many of the functions below | 1590 first because many of the functions below |
1584 init_dosfns (); | 1595 init_dosfns (); |
1585 /* Set defaults for several environment variables. */ | 1596 /* Set defaults for several environment variables. */ |
1586 init_environment (argc, argv, skip_args); | 1597 init_environment (argc, argv, skip_args); |
1587 #endif | 1598 #endif |
1588 init_cmdargs (argc, argv, skip_args); /* Create list Vcommand_line_args */ | 1599 init_cmdargs (argc, argv, skip_args); /* Create list Vcommand_line_args */ |
1589 init_buffer (); /* Init default directory of *scratch* buffer */ | 1600 init_buffer (); /* Set default directory of *scratch* buffer */ |
1590 | 1601 |
1591 #ifdef WINDOWSNT | 1602 #ifdef WINDOWSNT |
1592 init_environment(); | |
1593 init_ntproc(); | 1603 init_ntproc(); |
1594 #endif | 1604 #endif |
1595 | 1605 |
1596 init_redisplay (); /* Determine terminal type. | 1606 init_redisplay (); /* Determine terminal type. |
1597 init_sys_modes uses results */ | 1607 init_sys_modes uses results */ |