+(add-hook 'before-init-hook 'dos-set-default-process-coding-system)
+
+;; File names defined in preloaded packages can be incorrect or
+;; invalid if long file names were available during dumping, but not
+;; at runtime, or vice versa, and if the default file name begins with
+;; a period. Their defcustom's need to be reevaluated at startup. To
+;; see if the list of defcustom's below is up to date, run the command
+;; "M-x apropos-value RET ~/\. RET".
+(defun dos-reevaluate-defcustoms ()
+ ;; This is not needed in Emacs 23.2 and later, as trash-directory is
+ ;; initialized as nil. But something like this might become
+ ;; necessary in the future, so I'm keeping it here as a reminder.
+ ;(custom-reevaluate-setting 'trash-directory)
+ )
+
+(add-hook 'before-init-hook 'dos-reevaluate-defcustoms)
+
+(define-obsolete-variable-alias
+ 'register-name-alist 'dos-register-name-alist "24.1")