diff options
| author | Lars Ingebrigtsen | 2019-05-17 05:18:12 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2019-05-17 05:18:12 +0200 |
| commit | 54f5d678dccdf7b6a60579c6048e8cf87c81c4ae (patch) | |
| tree | 29dcfa658cd86706a07c4e4e2c655876af51006b | |
| parent | 92b1edb1f8232785c25cc9484a5dfb78b51da414 (diff) | |
| download | emacs-54f5d678dccdf7b6a60579c6048e8cf87c81c4ae.tar.gz emacs-54f5d678dccdf7b6a60579c6048e8cf87c81c4ae.zip | |
Declare two w32 functions to avoid byte compilation warnings
* lisp/w32-fns.el (w32-version, w32-read-registry): Declare these
functions to avoid byte compilation warnings. The functions
should be loaded when `w32--os-description' is called, as far as I
can tell.
| -rw-r--r-- | lisp/w32-fns.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/w32-fns.el b/lisp/w32-fns.el index 8762fe772b8..2b6464ab986 100644 --- a/lisp/w32-fns.el +++ b/lisp/w32-fns.el | |||
| @@ -305,7 +305,10 @@ names." | |||
| 305 | 305 | ||
| 306 | ;;;; System name and version for emacsbug.el | 306 | ;;;; System name and version for emacsbug.el |
| 307 | 307 | ||
| 308 | (defun w32--os-description () | 308 | (declare-function w32-version "w32-win" ()) |
| 309 | (declare-function w32-read-registry "w32fns" (root key name)) | ||
| 310 | |||
| 311 | (defun w32--os-descriptiono () | ||
| 309 | "Return a string describing the underlying OS and its version." | 312 | "Return a string describing the underlying OS and its version." |
| 310 | (let* ((w32ver (car (w32-version))) | 313 | (let* ((w32ver (car (w32-version))) |
| 311 | (w9x-p (< w32ver 5)) | 314 | (w9x-p (< w32ver 5)) |