# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 775080073 0
# Node ID faedd07b38ed3223b1be2f934fc3267676a4fedb
# Parent  ee7b758d2efa21b66ab2ac7a239a322677a91a19
(dbx): Use system-configuration, not system-type.

diff -r ee7b758d2efa -r faedd07b38ed lisp/gud.el
--- a/lisp/gud.el	Sun Jul 24 19:55:26 1994 +0000
+++ b/lisp/gud.el	Sun Jul 24 20:01:13 1994 +0000
@@ -635,8 +635,8 @@
     ;; Make dbx give out the source location info that we need.
     (process-send-string (get-buffer-process gud-comint-buffer)
 			 "printf \"\032\032%1d:\",$curline;file\n"))
-   ((or (string-match "-sunos" (symbol-name system-type))
-	(string-match "-solaris" (symbol-name system-type)))
+   ((or (string-match "-sunos" system-configuration)
+	(string-match "-solaris" system-configuration))
     ;; The following works for both the UCB and SunPro 2.0.1 versions
     ;; of dbx.  The `stop' is lost using the `\n' separator as in the
     ;; default case.  Is there a dbx where the newline is actually