# HG changeset patch # User Chong Yidong # Date 1223309790 0 # Node ID bbd02c8926040cbdbb6933573af19269e309073e # Parent 0985f0c9e147e89c2c4b46eee38fc44af568df33 (before-init-time, after-init-time): Move into emacs.c. (command-line): Set after-init-time to nil before initialization. diff -r 0985f0c9e147 -r bbd02c892604 lisp/startup.el --- a/lisp/startup.el Mon Oct 06 16:16:07 2008 +0000 +++ b/lisp/startup.el Mon Oct 06 16:16:30 2008 +0000 @@ -257,12 +257,6 @@ therefore, if you set `debug-on-error' non-nil in `.emacs', an error in one of these functions will invoke the debugger.") -(defvar before-init-time nil - "Value of `current-time' before Emacs begins initialization.") - -(defvar after-init-time nil - "Value of `current-time' after loading the init files.") - (defvar emacs-startup-hook nil "Normal hook run after loading init files and handling the command line.") @@ -700,6 +694,7 @@ (defun command-line () (setq before-init-time (current-time) + after-init-time nil command-line-default-directory default-directory) ;; Choose a reasonable location for temporary files.