diff options
author | Dan Nicolaescu <dann@ics.uci.edu> | 2008-01-06 00:56:56 +0000 |
---|---|---|
committer | Dan Nicolaescu <dann@ics.uci.edu> | 2008-01-06 00:56:56 +0000 |
commit | f3041af143f4ab74041fc918feee43aa8ac2da88 (patch) | |
tree | a84bdb93b8f941075b511480aa283e2847fbbcac /lisp | |
parent | 37d6e31370557ab868033dde113f11b54994e576 (diff) | |
download | emacs-f3041af143f4ab74041fc918feee43aa8ac2da88.tar.gz |
* 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.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/ChangeLog | 17 | ||||
-rw-r--r-- | lisp/dired.el | 2 | ||||
-rw-r--r-- | lisp/gnus/ChangeLog | 4 | ||||
-rw-r--r-- | lisp/gnus/gnus.el | 2 | ||||
-rw-r--r-- | lisp/lpr.el | 2 | ||||
-rw-r--r-- | lisp/ls-lisp.el | 2 | ||||
-rw-r--r-- | lisp/obsolete/x-apollo.el | 98 | ||||
-rw-r--r-- | lisp/paths.el | 2 | ||||
-rw-r--r-- | lisp/progmodes/gud.el | 7 | ||||
-rw-r--r-- | lisp/progmodes/ps-mode.el | 2 | ||||
-rw-r--r-- | lisp/ps-print.el | 2 | ||||
-rw-r--r-- | lisp/term/x-win.el | 25 |
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) |