changeset 33212:5298b23b61be

(w32-version): New function.
author Andrew Innes <andrewi@gnu.org>
date Sun, 05 Nov 2000 21:34:36 +0000
parents 392d84d26f42
children 001167797942
files lisp/w32-fns.el
diffstat 1 files changed, 6 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/w32-fns.el	Sun Nov 05 19:13:34 2000 +0000
+++ b/lisp/w32-fns.el	Sun Nov 05 21:34:36 2000 +0000
@@ -46,6 +46,12 @@
 ;; same buffer.
 (setq find-file-visit-truename t)
 
+(defun w32-version ()
+  "Return the MS-Windows version numbers.
+The value is a list of three integers: the major and minor version
+numbers, and the build number."
+  (x-server-version))
+
 (defvar w32-system-shells '("cmd" "cmd.exe" "command" "command.com"
 			    "4nt" "4nt.exe" "4dos" "4dos.exe"
 			    "ndos" "ndos.exe")