* configure.in: Remove references to unsupported systems.

* notes/copyright:
* MAINTAINERS: Remove references to files that have been removed.

* os.texi (System Environment): Remove references to OSes that are
not supported anymore.

* PROBLEMS:
* MACHINES: Remove references to systems not supported anymore.

* makefile.w32-in:
* Makefile.in: Remove references to Xenix.

* gnus.el (gnus-use-long-file-name): Remove reference to xenix.

* obsolete/x-apollo.el: Remove file for unsupported system.

* term/x-win.el (vendor-specific-keysyms): Remove reference to
Apollo.

* progmodes/gud.el (gud-dgux-p): Remove.
(dbx): Remove reference to dgux.

* progmodes/ps-mode.el (ps-mode-print-function):
* ps-print.el (ps-lp-system):
* paths.el (rmail-spool-directory):
* ls-lisp.el (ls-lisp-emulation):
* lpr.el (lpr-lp-system):
* dired.el (dired-chown-program): Remove references to dgux.

* m/7300.h:
* m/acorn.h:
* m/alliant-2800.h:
* m/alliant.h:
* m/alliant1.h:
* m/alliant4.h:
* m/altos.h:
* m/amdahl.h:
* m/apollo.h:
* m/att3b.h:
* m/aviion-intel.h:
* m/aviion.h:
* m/celerity.h:
* m/clipper.h:
* m/cnvrgnt.h:
* m/convex.h:
* m/cydra5.h:
* m/delta88k.h:
* m/dpx2.h:
* m/dual.h:
* m/elxsi.h:
* m/f301.h:
* m/gould-np1.h:
* m/gould.h:
* m/i860.h:
* m/ibmps2-aix.h:
* m/ibmrt-aix.h:
* m/ibmrt.h:
* m/irist.h:
* m/is386.h:
* m/isi-ov.h:
* m/mega68.h:
* m/mg1.h:
* m/news-r6.h:
* m/news-risc.h:
* m/news.h:
* m/nh3000.h:
* m/nh4000.h:
* m/ns16000.h:
* m/ns32000.h:
* m/nu.h:
* m/orion.h:
* m/orion105.h:
* m/paragon.h:
* m/pfa50.h:
* m/plexus.h:
* m/pyramid.h:
* m/pyrmips.h:
* m/sh3el.h:
* m/sps7.h:
* m/sr2k.h:
* m/stride.h:
* m/sun1.h:
* m/sun2.h:
* m/sun3-68881.h:
* m/sun3-fpa.h:
* m/sun3-soft.h:
* m/sun3.h:
* m/sun386.h:
* m/symmetry.h:
* m/tad68k.h:
* m/tahoe.h:
* m/targon31.h:
* m/tek4300.h:
* m/tekxd88.h:
* m/tower32.h:
* m/tower32v3.h:
* m/ustation.h:
* m/wicat.h:
* m/xps100.h:
* s/cxux.h:
* s/cxux7.h:
* s/dgux.h:
* s/dgux4.h:
* s/dgux5-4-3.h:
* s/dgux5-4r2.h:
* s/esix.h:
* s/esix5r4.h:
* s/hiuxmpp.h:
* s/hiuxwe2.h:
* s/iris3-5.h:
* s/iris3-6.h:
* s/isc2-2.h:
* s/isc3-0.h:
* s/isc4-0.h:
* s/isc4-1.h:
* s/newsos5.h:
* s/newsos6.h:
* s/osf1.h:
* s/osf5-0.h:
* s/riscix1-1.h:
* s/riscix12.h:
* s/sco4.h:
* s/sco5.h:
* s/sunos4-0.h:
* s/sunos4-1.h:
* s/sunos413.h:
* s/sunos4shr.h:
* s/umax.h:
* s/unipl5-2.h:
* s/xenix.h:
* cxux-crt0.s:
* unexapollo.c:
* unexconvex.c:
* unexenix.c:
* unexsni.c: Remove files for systems no longer supported.

* m/intel386.h: Remove references to unsupported systems.

* w32.c (get_emacs_configuration): Remove reference to i860.

* sysdep.c: Remove dead code.

12 files changed, 29 insertions, 136 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 910e3a8c63c..9665c6cd561 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,20 @@
+2008-01-06  Dan Nicolaescu  <dann@ics.uci.edu>
+
+        * obsolete/x-apollo.el: Remove file for unsupported system.
+
+        * term/x-win.el (vendor-specific-keysyms): Remove reference to
+        Apollo.
+
+        * progmodes/gud.el (gud-dgux-p): Remove.
+        (dbx): Remove reference to dgux.
+
+        * progmodes/ps-mode.el (ps-mode-print-function):
+        * ps-print.el (ps-lp-system):
+        * paths.el (rmail-spool-directory):
+        * ls-lisp.el (ls-lisp-emulation):
+        * lpr.el (lpr-lp-system):
+        * dired.el (dired-chown-program): Remove references to dgux.
+
 2008-01-05  Stefan Monnier  <monnier@iro.umontreal.ca>
 
         * vc.el (vc-process-sentinel): Fix apparent typo.
diff --git a/lisp/dired.el b/lisp/dired.el
index 51067e46001..b9a360a6e91 100644
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -70,7 +70,7 @@ If nil, `dired-listing-switches' is used.")
 
 ;;;###autoload
 (defvar dired-chown-program
-  (if (memq system-type '(hpux dgux usg-unix-v irix linux gnu/linux cygwin))
+  (if (memq system-type '(hpux usg-unix-v irix linux gnu/linux cygwin))
       "chown"
     (if (file-exists-p "/usr/sbin/chown")
         "/usr/sbin/chown"
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index a6b43d7831e..91063c2a974 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,7 @@
+2008-01-06  Dan Nicolaescu  <dann@ics.uci.edu>
+
+        * gnus.el (gnus-use-long-file-name): Remove reference to xenix.
+
 2007-12-28  Reiner Steib  <Reiner.Steib@gmx.de>
 
         * message.el (message-send-mail-function): Increase custom version.
diff --git a/lisp/gnus/gnus.el b/lisp/gnus/gnus.el
index fc76fce86d7..36066e82166 100644
--- a/lisp/gnus/gnus.el
+++ b/lisp/gnus/gnus.el
@@ -1522,7 +1522,7 @@ If it is nil, no confirmation is required."
   :type '(choice (const :tag "No limit" nil)
                  integer))
 
-(defcustom gnus-use-long-file-name (not (memq system-type '(usg-unix-v xenix)))
+(defcustom gnus-use-long-file-name (not (memq system-type '(usg-unix-v)))
   "*Non-nil means that the default name of a file to save articles in is the group name.
 If it's nil, the directory form of the group name is used instead.
 
diff --git a/lisp/lpr.el b/lisp/lpr.el
index 4df98d6d751..721657a095f 100644
--- a/lisp/lpr.el
+++ b/lisp/lpr.el
@@ -37,7 +37,7 @@
 
 ;;;###autoload
 (defvar lpr-lp-system
-  (memq system-type '(usg-unix-v dgux hpux irix)))
+  (memq system-type '(usg-unix-v hpux irix)))
 
 
 (defgroup lpr nil
diff --git a/lisp/ls-lisp.el b/lisp/ls-lisp.el
index a016b8369bf..0c387c34a0c 100644
--- a/lisp/ls-lisp.el
+++ b/lisp/ls-lisp.el
@@ -75,7 +75,7 @@
   (cond ((eq system-type 'macos) 'MacOS)
         ;; ((eq system-type 'windows-nt) 'MS-Windows)
         ((memq system-type
-               '(hpux dgux usg-unix-v unisoft-unix rtu irix berkeley-unix))
+               '(hpux usg-unix-v unisoft-unix irix berkeley-unix))
          'UNIX))                        ; very similar to GNU
   ;; Anything else defaults to nil, meaning GNU.
   "*Platform to emulate: GNU (default), MacOS, MS-Windows, UNIX.
diff --git a/lisp/obsolete/x-apollo.el b/lisp/obsolete/x-apollo.el
deleted file mode 100644
index f06f793dc94..00000000000
--- a/lisp/obsolete/x-apollo.el
+++ /dev/null
@@ -1,98 +0,0 @@
-;;; x-apollo.el --- Apollo support functions
-
-;; Copyright (C) 1995, 2001, 2002, 2003, 2004, 2005,
-;;   2006, 2007 Free Software Foundation, Inc.
-
-;; This file is part of GNU Emacs.
-
-;; GNU Emacs is free software; you can redistribute it and/or modify
-;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation; either version 3, or (at your option)
-;; any later version.
-
-;; GNU Emacs is distributed in the hope that it will be useful,
-;; but WITHOUT ANY WARRANTY; without even the implied warranty of
-;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;; GNU General Public License for more details.
-
-;; You should have received a copy of the GNU General Public License
-;; along with GNU Emacs; see the file COPYING.  If not, write to the
-;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
-;; Boston, MA 02110-1301, USA.
-
-;;; Commentary:
-
-;;; Code:
-
-(defun apollo-kill-entire-line ()
-  "Kill the entire line containing point."
-  (interactive)
-  (beginning-of-line)
-  (kill-line 1))
-
-(defun apollo-scroll-window-right ()
-  "Scroll window to right ten columns."
-  (interactive)
-  (scroll-left 10))
-
-(defun apollo-scroll-window-left ()
-  "Scroll window to left ten columns."
-  (interactive)
-  (scroll-right 10))
-
-(defun apollo-scroll-window-forward-line ()
-  "Move window forward one line leaving cursor at position in window."
-  (interactive)
-  (scroll-up 1))
-
-(defun apollo-scroll-window-backward-line ()
-  "Move window backward one line leaving cursor at position in window."
-  (interactive)
-  (scroll-down 1))
-
-;;; Define and Enable the Function Key Bindings.
-
-(global-set-key [S-tab] "\C-i") ;Shift TAB
-(global-set-key [C-tab] "\C-i") ;Control TAB
-(global-set-key [S-return] "\C-m") ;Shift RET
-(global-set-key [C-return] "\C-m") ;Control RET
-(global-set-key [linedel] 'apollo-kill-entire-line) ;LINE DEL
-(global-set-key [chardel] 'delete-char) ;CHAR DEL
-(global-set-key [leftbar] 'beginning-of-line) ;LEFT BAR ARROW
-(global-set-key [rightbar] 'end-of-line) ;RIGHT BAR ARROW
-(global-set-key [leftbox] 'apollo-scroll-window-left) ;LEFT BOX ARROW
-(global-set-key [rightbox] 'apollo-scroll-window-right) ;RIGHT BOX ARROW
-(global-set-key [S-up] 'apollo-scroll-window-backward-line) ;Shift UP ARROW
-(global-set-key [S-down] 'apollo-scroll-window-forward-line) ;Shift DOWN ARROW
-(global-set-key [select] 'set-mark-command) ;MARK
-(global-set-key [S-insert] 'overwrite-mode) ;INS MODE
-(global-set-key [S-linedel] 'yank) ;Shift LINE DEL
-(global-set-key [S-chardel] 'delete-char)       ;Shift CHAR DEL
-(global-set-key [copy] 'copy-region-as-kill) ;COPY
-(global-set-key [S-cut] 'kill-region) ;CUT
-(global-set-key [paste] 'yank) ;PASTE
-(global-set-key [S-undo] 'undo) ;UNDO
-(global-set-key [S-left] 'backward-word) ;Shift LEFT ARROW
-(global-set-key [S-right] 'forward-word) ;Shift RIGHT ARROW
-(global-set-key [upbox] 'scroll-down) ;UP BOX ARROW
-(global-set-key [S-upbox] 'beginning-of-buffer) ;Shift UP BOX ARROW
-(global-set-key [downbox] 'scroll-up) ;DOWN BOX ARROW
-(global-set-key [S-downbox] 'end-of-buffer) ;Shift DOWN BOX ARROW
-(global-set-key [S-redo] 'toggle-read-only) ;Shift AGAIN
-(global-set-key [exit] 'save-buffer) ;EXIT
-(global-set-key [S-cancel] 'kill-buffer) ;ABORT
-(global-set-key [S-save] 'save-buffer) ;SAVE
-(global-set-key [S-leftbar] 'beginning-of-buffer) ;Shift LEFT BAR ARROW
-(global-set-key [cmd] 'execute-extended-command) ;CMD
-(global-set-key [S-rightbar] 'end-of-buffer) ;Shift RIGHT BAR ARROW
-(global-set-key [next] 'other-window) ;NEXT WNDW
-(global-set-key [S-next] 'delete-window) ;Shift NEXT WNDW
-(global-set-key [read] 'find-file-read-only) ;READ
-(global-set-key [edit] 'find-file) ;EDIT
-(global-set-key [S-shell] 'shell) ;SHELL
-(global-set-key [S-help] 'manual-entry) ;HELP
-
-(provide 'x-apollo)
-
-;;; arch-tag: 4f3e86f4-557c-44b3-978e-144fc4dc812e
-;;; x-apollo.el ends here
diff --git a/lisp/paths.el b/lisp/paths.el
index 113bf2ec91e..d335c758a3d 100644
--- a/lisp/paths.el
+++ b/lisp/paths.el
@@ -153,7 +153,7 @@ The `ORGANIZATION' environment variable is used instead if defined.")
         ;; Many GNU/Linux systems use this name.
         ((file-exists-p "/var/spool/mail")
          "/var/spool/mail/")
-        ((memq system-type '(dgux hpux usg-unix-v unisoft-unix rtu irix))
+        ((memq system-type '(hpux usg-unix-v unisoft-unix irix))
          "/usr/mail/")
         (t "/usr/spool/mail/"))
   "Name of directory used by system mailer for delivering new mail.
diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el
index 3c6736ac79b..5875e794828 100644
--- a/lisp/progmodes/gud.el
+++ b/lisp/progmodes/gud.el
@@ -1233,10 +1233,6 @@ a better solution in 6.1 upwards.")
           (setq result (substring result 0 (match-beginning 0))))))
     (or result "")))
 
-(defvar gud-dgux-p (string-match "-dgux" system-configuration)
-  "Non-nil means to assume the interface approriate for DG/UX dbx.
-This was tested using R4.11.")
-
 ;; There are a couple of differences between DG's dbx output and normal
 ;; dbx output which make it nontrivial to integrate this into the
 ;; standard dbx-marker-filter (mainly, there are a different number of
@@ -1295,9 +1291,6 @@ and source-file directory for your debugger."
    (gud-irix-p
     (gud-common-init command-line 'gud-dbx-massage-args
                      'gud-irixdbx-marker-filter))
-   (gud-dgux-p
-    (gud-common-init command-line 'gud-dbx-massage-args
-                     'gud-dguxdbx-marker-filter))
    (t
     (gud-common-init command-line 'gud-dbx-massage-args
                      'gud-dbx-marker-filter)))
diff --git a/lisp/progmodes/ps-mode.el b/lisp/progmodes/ps-mode.el
index 6327a68302b..cc4e2a4f69b 100644
--- a/lisp/progmodes/ps-mode.el
+++ b/lisp/progmodes/ps-mode.el
@@ -109,7 +109,7 @@ When the figure is finished these values should be replaced."
 (defcustom ps-mode-print-function
   (lambda ()
      (let ((lpr-switches nil)
-           (lpr-command (if (memq system-type '(usg-unix-v dgux hpux irix))
+           (lpr-command (if (memq system-type '(usg-unix-v hpux irix))
                             "lp" "lpr")))
        (lpr-buffer)))
   "*Lisp function to print current buffer as PostScript."
diff --git a/lisp/ps-print.el b/lisp/ps-print.el
index 0e442f3b104..fdceffd9721 100644
--- a/lisp/ps-print.el
+++ b/lisp/ps-print.el
@@ -1489,7 +1489,7 @@ Please send all bug fixes and enhancements to
 (defconst ps-windows-system
   (memq system-type '(emx win32 w32 mswindows ms-dos windows-nt)))
 (defconst ps-lp-system
-  (memq system-type '(usg-unix-v dgux hpux irix)))
+  (memq system-type '(usg-unix-v hpux irix)))
 
 
 (defun ps-xemacs-color-name (color)
diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el
index 66c5a272e1c..da1d158050c 100644
--- a/lisp/term/x-win.el
+++ b/lisp/term/x-win.el
@@ -1228,30 +1228,7 @@ XConsortium: rgb.txt,v 10.41 94/02/20 18:39:36 rws Exp")
   "Return the appropriate value of `system-key-alist' for VENDOR.
 VENDOR is a string containing the name of the X Server's vendor,
 as returned by `x-server-vendor'."
-  ;; Fixme: Drop Apollo now?
-  (cond ((string-equal vendor "Apollo Computer Inc.")
-         '((65280 . linedel)
-           (65281 . chardel)
-           (65282 . copy)
-           (65283 . cut)
-           (65284 . paste)
-           (65285 . move)
-           (65286 . grow)
-           (65287 . cmd)
-           (65288 . shell)
-           (65289 . leftbar)
-           (65290 . rightbar)
-           (65291 . leftbox)
-           (65292 . rightbox)
-           (65293 . upbox)
-           (65294 . downbox)
-           (65295 . pop)
-           (65296 . read)
-           (65297 . edit)
-           (65298 . save)
-           (65299 . exit)
-           (65300 . repeat)))
-        ((or (string-equal vendor "Hewlett-Packard Incorporated")
+  (cond ((or (string-equal vendor "Hewlett-Packard Incorporated")
              (string-equal vendor "Hewlett-Packard Company"))
          '((  168 . mute-acute)
            (  169 . mute-grave)