diff options
| author | Dan Nicolaescu | 2007-10-21 00:24:32 +0000 |
|---|---|---|
| committer | Dan Nicolaescu | 2007-10-21 00:24:32 +0000 |
| commit | 729f1525da7a8816e655daa51f6f4b2e7d7a043b (patch) | |
| tree | 63be73ceb74026b6c20da50e9a4631f184d2b1f0 /lisp/term | |
| parent | 64b53a1f5a6e4cc53763d3d8879d7509ceae5e6a (diff) | |
| download | emacs-729f1525da7a8816e655daa51f6f4b2e7d7a043b.tar.gz emacs-729f1525da7a8816e655daa51f6f4b2e7d7a043b.zip | |
* textmodes/reftex.el: Move require easymenu before first use.
(reftex-info): Require info at compile too.
* textmodes/org-publish.el (org-publish-org-to-html)
(org-publish-org-to): Require org at compile time too.
(org-publish-attachment): Require at compile time too.
* term/tty-colors.el (w32-tty-standard-colors): Pacify
byte-compiler.
* term/pc-win.el (frame-creation-function-alist): Add to this
instead of setting frame-creation-function.
* play/blackbox.el (bb-up, bb-down): Use forward-line.
* net/rcirc.el (rcirc-markup-text-functions): Move definition
earlier.
* calendar/todo-mode.el: Require calendar at compile time.
* calendar/cal-islam.el: Require diary-lib at compile time.
* calendar/cal-hebrew.el: Require diary-lib and holidays at
compile time.
* w32-vars.el: Provide w32-vars.
* term/w32-win.el: Require w32-vars.
(w32-color-map): Pacify byte-compiler.
* loadup.el: Load w32-wars before term/w32-win.
Diffstat (limited to 'lisp/term')
| -rw-r--r-- | lisp/term/pc-win.el | 2 | ||||
| -rw-r--r-- | lisp/term/tty-colors.el | 1 | ||||
| -rw-r--r-- | lisp/term/w32-win.el | 2 |
3 files changed, 4 insertions, 1 deletions
diff --git a/lisp/term/pc-win.el b/lisp/term/pc-win.el index ca85e824caa..ecbda7d9c1e 100644 --- a/lisp/term/pc-win.el +++ b/lisp/term/pc-win.el | |||
| @@ -130,7 +130,7 @@ | |||
| 130 | (unless success (delete-frame frame))) | 130 | (unless success (delete-frame frame))) |
| 131 | frame)) | 131 | frame)) |
| 132 | 132 | ||
| 133 | (setq frame-creation-function 'make-msdos-frame) | 133 | (add-to-list 'frame-creation-function-alist '(pc . make-msdos-frame)) |
| 134 | 134 | ||
| 135 | ;; --------------------------------------------------------------------------- | 135 | ;; --------------------------------------------------------------------------- |
| 136 | ;; More or less useful imitations of certain X-functions. A lot of the | 136 | ;; More or less useful imitations of certain X-functions. A lot of the |
diff --git a/lisp/term/tty-colors.el b/lisp/term/tty-colors.el index 18b07fafc3a..70323e3155b 100644 --- a/lisp/term/tty-colors.el +++ b/lisp/term/tty-colors.el | |||
| @@ -63,6 +63,7 @@ | |||
| 63 | ;;; Code: | 63 | ;;; Code: |
| 64 | 64 | ||
| 65 | (defvar msdos-color-values) | 65 | (defvar msdos-color-values) |
| 66 | (defvar w32-tty-standard-colors) | ||
| 66 | 67 | ||
| 67 | ;; The following list is taken from rgb.txt distributed with X. | 68 | ;; The following list is taken from rgb.txt distributed with X. |
| 68 | ;; | 69 | ;; |
diff --git a/lisp/term/w32-win.el b/lisp/term/w32-win.el index 51a25482be7..6a2ea13be38 100644 --- a/lisp/term/w32-win.el +++ b/lisp/term/w32-win.el | |||
| @@ -79,12 +79,14 @@ | |||
| 79 | (require 'menu-bar) | 79 | (require 'menu-bar) |
| 80 | (require 'dnd) | 80 | (require 'dnd) |
| 81 | (require 'code-pages) | 81 | (require 'code-pages) |
| 82 | (require 'w32-vars) | ||
| 82 | 83 | ||
| 83 | ;; Keep an obsolete alias for w32-focus-frame in case it is used by code | 84 | ;; Keep an obsolete alias for w32-focus-frame in case it is used by code |
| 84 | ;; outside Emacs. | 85 | ;; outside Emacs. |
| 85 | (define-obsolete-function-alias 'w32-focus-frame 'x-focus-frame "23.1") | 86 | (define-obsolete-function-alias 'w32-focus-frame 'x-focus-frame "23.1") |
| 86 | 87 | ||
| 87 | (defvar xlfd-regexp-registry-subnum) | 88 | (defvar xlfd-regexp-registry-subnum) |
| 89 | (defvar w32-color-map) ;; defined in w32fns.c | ||
| 88 | 90 | ||
| 89 | ;; Conditional on new-fontset so bootstrapping works on non-GUI compiles | 91 | ;; Conditional on new-fontset so bootstrapping works on non-GUI compiles |
| 90 | (if (fboundp 'new-fontset) | 92 | (if (fboundp 'new-fontset) |