Mercurial > hg > xemacs-beta

comparison src/emacs.c @ 187:b405438285a2 r20-3b20

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b20
author cvs
date Mon, 13 Aug 2007 09:56:28 +0200
parents 3d6bfa290dbd
children a2f645c6b9f8
comparison
equal deleted inserted replaced
186:24ac94803b48 187:b405438285a2
189 EMACS_UNBLOCK_SIGNAL (fatal_error_code); 189 EMACS_UNBLOCK_SIGNAL (fatal_error_code);
190 190
191 /* If fatal error occurs in code below, avoid infinite recursion. */ 191 /* If fatal error occurs in code below, avoid infinite recursion. */
192 if (! fatal_error_in_progress) 192 if (! fatal_error_in_progress)
193 { 193 {
194 fatal_error_in_progress = 1; 194 fatal_error_in_progress = dont_check_for_quit = 1;
195 shut_down_emacs (sig, Qnil); 195 shut_down_emacs (sig, Qnil);
196 stderr_out("\nLisp backtrace follows:\n\n"); 196 stderr_out("\nLisp backtrace follows:\n\n");
197 Fbacktrace(Qexternal_debugging_output, Qt); 197 Fbacktrace(Qexternal_debugging_output, Qt);
198 # if 0 /* This is evil, rarely useful, and causes grief in some cases. */ 198 # if 0 /* This is evil, rarely useful, and causes grief in some cases. */
199 /* Check for Sun-style stack printing via /proc */ 199 /* Check for Sun-style stack printing via /proc */
2361 2361
2362 DEFVAR_LISP ("package-path", &Vpackage_path /* 2362 DEFVAR_LISP ("package-path", &Vpackage_path /*
2363 List of directories configured for package searching. 2363 List of directories configured for package searching.
2364 */ ); 2364 */ );
2365 #ifndef PACKAGE_PATH 2365 #ifndef PACKAGE_PATH
2366 #define PACKAGE_PATH PATH_PREFIX "/lib/xemacs/packages:~/.xemacs" 2366 #define PACKAGE_PATH "~/.xemacs:" PATH_PREFIX "/lib/xemacs/packages"
2367 #endif 2367 #endif
2368 Vpackage_path = decode_path(PACKAGE_PATH); 2368 Vpackage_path = decode_path(PACKAGE_PATH);
2369 2369
2370 DEFVAR_BOOL ("noninteractive", &noninteractive1 /* 2370 DEFVAR_BOOL ("noninteractive", &noninteractive1 /*
2371 Non-nil means XEmacs is running without interactive terminal. 2371 Non-nil means XEmacs is running without interactive terminal.