* lisp/w32-fns.el (w32--os-description): Fix minor logic error

diff --git a/lisp/w32-fns.el b/lisp/w32-fns.el
index bb19706129e7b6687d1863221e3efa7f0d989f6c..d9b91cfb6eae4431dfdaff2ea5306401178f421c 100644 (file)
--- a/lisp/w32-fns.el
+++ b/lisp/w32-fns.el
@@ -331,7 +331,7 @@ names."
                              (vminor
                               (w32-read-registry 'HKLM key
                                                  "CurrentMinorVersionNumber")))
-                         (if (and vmajor vmajor)
+                         (if (and vmajor vminor)
                              (format "%d.%d" vmajor vminor)
                            (w32-read-registry 'HKLM key "CurrentVersion")))))
          (os-csd (w32-read-registry 'HKLM key "CSDVersion"))