diff options
author | Juanma Barranquero <lekktu@gmail.com> | 2004-05-28 19:14:50 +0000 |
---|---|---|
committer | Juanma Barranquero <lekktu@gmail.com> | 2004-05-28 19:14:50 +0000 |
commit | 49bd2bfeb42a9ae6b46ec0069514d2d5ebec8514 (patch) | |
tree | 6628db4a81aaca2670441b22aeca074f6ac71c51 /lisp/w32-fns.el | |
parent | 287aae6ce97e0a6bfd62ef259d2f9a44f00c547e (diff) | |
download | emacs-49bd2bfeb42a9ae6b46ec0069514d2d5ebec8514.tar.gz |
(w32-using-nt, w32-shell-dos-semantics, set-w32-system-coding-system):
Doc fixes.
Diffstat (limited to 'lisp/w32-fns.el')
-rw-r--r-- | lisp/w32-fns.el | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/lisp/w32-fns.el b/lisp/w32-fns.el index 172af902cb9..4a485414d7a 100644 --- a/lisp/w32-fns.el +++ b/lisp/w32-fns.el @@ -1,6 +1,6 @@ ;;; w32-fns.el --- Lisp routines for Windows NT -;; Copyright (C) 1994, 2001 Free Software Foundation, Inc. +;; Copyright (C) 1994, 2001, 2004 Free Software Foundation, Inc. ;; Author: Geoff Voelker <voelker@cs.washington.edu> ;; Keywords: internal @@ -54,7 +54,8 @@ numbers, and the build number." (x-server-version)) (defun w32-using-nt () - "Return non-nil if literally running on Windows NT (i.e., not Windows 9X)." + "Return non-nil if running on a 32-bit Windows system. +That includes all Windows systems except for 9X/Me." (and (eq system-type 'windows-nt) (getenv "SystemRoot"))) (defun w32-shell-name () @@ -71,7 +72,7 @@ numbers, and the build number." w32-system-shells))) (defun w32-shell-dos-semantics () - "Return t if the interactive shell being used expects msdos shell semantics." + "Return non-nil if the interactive shell being used expects MSDOS shell semantics." (or (w32-system-shell-p (w32-shell-name)) (and (member (downcase (file-name-nondirectory (w32-shell-name))) '("cmdproxy" "cmdproxy.exe")) @@ -265,13 +266,13 @@ with a definition that really does change some file names." (get 'x-selections type)) (defun set-w32-system-coding-system (coding-system) - "Set the coding system used by the Windows System to CODING-SYSTEM. + "Set the coding system used by the Windows system to CODING-SYSTEM. This is used for things like passing font names with non-ASCII characters in them to the system. For a list of possible values of CODING-SYSTEM, use \\[list-coding-systems]. This function is provided for backward compatibility, since -w32-system-coding-system is now an alias for `locale-coding-system'." +`w32-system-coding-system' is now an alias for `locale-coding-system'." (interactive (list (let ((default locale-coding-system)) (read-coding-system |