--- gnus-msg.el~	Fri Feb  7 17:17:17 2003
+++ gnus-msg.el	Sun Feb  9 06:04:11 2003
@@ -284,7 +284,7 @@
   :type 'boolean)
 
 (defcustom gnus-version-expose-system nil
-  "If non-nil, `system-configuration' is exposed in `gnus-extended-version'."
+  "If non-nil, `system-type' is exposed in `gnus-extended-version'."
   :group 'gnus-message
   :type 'boolean)
 
@@ -1034,7 +1034,7 @@
     ((string-match "^\\(\\([.0-9]+\\)*\\)\\.[0-9]+$" emacs-version)
      (concat "Emacs/" (match-string 1 emacs-version)
 	     (if gnus-version-expose-system
-		 " (" system-configuration ")"
+		 (concat " (" (symbol-name system-type) ")")
 	       "")))
     ((string-match "\\([A-Z]*[Mm][Aa][Cc][Ss]\\)[^(]*\\(\\((beta.*)\\|'\\)\\)?"
 		   emacs-version)
@@ -1044,10 +1044,11 @@
 		 (match-string 3 emacs-version)
 	       "")
 	     (if (boundp 'xemacs-codename)
-	     (if gnus-version-expose-system
-		 (concat " (" xemacs-codename ", " system-configuration ")")
-	       (concat " (" xemacs-codename ")"))
-	     "")))
+		 (if gnus-version-expose-system
+		     (concat " (" xemacs-codename ", "
+			     (symbol-name system-type) ")")
+		   (concat " (" xemacs-codename ")"))
+	       "")))
     (t emacs-version))))