aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris2010-10-08 00:51:19 -0700
committerGlenn Morris2010-10-08 00:51:19 -0700
commit24ac444fbe5d76a7cf09a62b741b9e956ab90d3e (patch)
tree404260f7dddff8ecbc0ab496857fe431c739db18
parent5d5870b813c9ad0cc51740553fc9adb7400888e3 (diff)
downloademacs-24ac444fbe5d76a7cf09a62b741b9e956ab90d3e.tar.gz
emacs-24ac444fbe5d76a7cf09a62b741b9e956ab90d3e.zip
Remove some tests for defunct system-types.
* lisp/vc/ediff-wind.el (ediff-setup-control-frame): * lisp/vc/ediff-ptch.el (ediff-default-backup-extension): * lisp/vc/ediff-diff.el (ediff-shell, ediff-diff-options) (ediff-exec-process): Remove system-types emx, windows-95.
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/vc/ediff-diff.el16
-rw-r--r--lisp/vc/ediff-ptch.el8
-rw-r--r--lisp/vc/ediff-wind.el17
4 files changed, 24 insertions, 22 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 26648fedece..43589198bea 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,10 @@
12010-10-08 Glenn Morris <rgm@gnu.org> 12010-10-08 Glenn Morris <rgm@gnu.org>
2 2
3 * vc/ediff-wind.el (ediff-setup-control-frame):
4 * vc/ediff-ptch.el (ediff-default-backup-extension):
5 * vc/ediff-diff.el (ediff-shell, ediff-diff-options)
6 (ediff-exec-process): Remove system-types emx, windows-95.
7
3 * net/browse-url.el (browse-url-xdg-open): Shell-quote url. (Bug#7166) 8 * net/browse-url.el (browse-url-xdg-open): Shell-quote url. (Bug#7166)
4 9
52010-10-07 Chong Yidong <cyd@stupidchicken.com> 102010-10-07 Chong Yidong <cyd@stupidchicken.com>
diff --git a/lisp/vc/ediff-diff.el b/lisp/vc/ediff-diff.el
index 4316b6e4d93..70352751d8d 100644
--- a/lisp/vc/ediff-diff.el
+++ b/lisp/vc/ediff-diff.el
@@ -1,7 +1,8 @@
1;;; ediff-diff.el --- diff-related utilities 1;;; ediff-diff.el --- diff-related utilities
2 2
3;; Copyright (C) 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 3;; Copyright (C) 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002,
4;; 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc. 4;; 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010
5;; Free Software Foundation, Inc.
5 6
6;; Author: Michael Kifer <kifer@cs.stonybrook.edu> 7;; Author: Michael Kifer <kifer@cs.stonybrook.edu>
7;; Package: ediff 8;; Package: ediff
@@ -54,8 +55,7 @@ Must produce output compatible with Unix's diff3 program."
54(fset 'ediff-set-actual-diff-options '(lambda () nil)) 55(fset 'ediff-set-actual-diff-options '(lambda () nil))
55 56
56(defcustom ediff-shell 57(defcustom ediff-shell
57 (cond ((eq system-type 'emx) "cmd") ; OS/2 58 (cond ((memq system-type '(ms-dos windows-nt))
58 ((memq system-type '(ms-dos windows-nt windows-95))
59 shell-file-name) ; no standard name on MS-DOS 59 shell-file-name) ; no standard name on MS-DOS
60 (t "sh")) ; UNIX 60 (t "sh")) ; UNIX
61 "The shell used to run diff and patch. 61 "The shell used to run diff and patch.
@@ -85,7 +85,7 @@ are `-I REGEXP', to ignore changes whose lines match the REGEXP."
85 (ediff-set-actual-diff-options)) 85 (ediff-set-actual-diff-options))
86 86
87(defcustom ediff-diff-options 87(defcustom ediff-diff-options
88 (if (memq system-type '(ms-dos windows-nt windows-95)) "--binary" "") 88 (if (memq system-type '(ms-dos windows-nt)) "--binary" "")
89 "Options to pass to `ediff-diff-program'. 89 "Options to pass to `ediff-diff-program'.
90If Unix diff is used as `ediff-diff-program', 90If Unix diff is used as `ediff-diff-program',
91then a useful option is `-w', to ignore space. 91then a useful option is `-w', to ignore space.
@@ -1229,15 +1229,14 @@ delimiter regions"))
1229 (with-current-buffer buffer 1229 (with-current-buffer buffer
1230 (erase-buffer) 1230 (erase-buffer)
1231 (setq default-directory directory) 1231 (setq default-directory directory)
1232 (if (or (memq system-type '(emx ms-dos windows-nt windows-95)) 1232 (if (or (memq system-type '(ms-dos windows-nt))
1233 synch) 1233 synch)
1234 ;; In OS/2 (emx) do it synchronously, since OS/2 doesn't let us 1234 ;; In Windows do it synchronously, since Windows doesn't let us
1235 ;; delete files used by other processes. Thus, in ediff-buffers 1235 ;; delete files used by other processes. Thus, in ediff-buffers
1236 ;; and similar functions, we can't delete temp files because 1236 ;; and similar functions, we can't delete temp files because
1237 ;; they might be used by the asynch process that computes 1237 ;; they might be used by the asynch process that computes
1238 ;; custom diffs. So, we have to wait till custom diff 1238 ;; custom diffs. So, we have to wait till custom diff
1239 ;; subprocess is done. 1239 ;; subprocess is done.
1240 ;; Similarly for Windows-*
1241 ;; In DOS, must synchronize because DOS doesn't have 1240 ;; In DOS, must synchronize because DOS doesn't have
1242 ;; asynchronous processes. 1241 ;; asynchronous processes.
1243 (apply 'call-process program nil buffer nil args) 1242 (apply 'call-process program nil buffer nil args)
@@ -1533,5 +1532,4 @@ affects only files whose names match the expression."
1533;; eval: (put 'ediff-with-current-buffer 'edebug-form-spec '(form body)) 1532;; eval: (put 'ediff-with-current-buffer 'edebug-form-spec '(form body))
1534;; End: 1533;; End:
1535 1534
1536;; arch-tag: a86d448e-58d7-4572-a1d9-fdedfa22f648
1537;;; ediff-diff.el ends here 1535;;; ediff-diff.el ends here
diff --git a/lisp/vc/ediff-ptch.el b/lisp/vc/ediff-ptch.el
index b6c7f6ab7ba..393bdcb673c 100644
--- a/lisp/vc/ediff-ptch.el
+++ b/lisp/vc/ediff-ptch.el
@@ -1,7 +1,8 @@
1;;; ediff-ptch.el --- Ediff's patch support 1;;; ediff-ptch.el --- Ediff's patch support
2 2
3;; Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 3;; Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
4;; 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc. 4;; 2005, 2006, 2007, 2008, 2009, 2010
5;; Free Software Foundation, Inc.
5 6
6;; Author: Michael Kifer <kifer@cs.stonybrook.edu> 7;; Author: Michael Kifer <kifer@cs.stonybrook.edu>
7;; Package: ediff 8;; Package: ediff
@@ -62,7 +63,7 @@ case the default value for this variable should be changed."
62 63
63;; the default backup extension 64;; the default backup extension
64(defconst ediff-default-backup-extension 65(defconst ediff-default-backup-extension
65 (if (memq system-type '(emx ms-dos)) 66 (if (eq system-type 'ms-dos)
66 "_orig" ".orig")) 67 "_orig" ".orig"))
67 68
68 69
@@ -841,5 +842,4 @@ you can still examine the changes via M-x ediff-files"
841;; eval: (put 'ediff-with-current-buffer 'edebug-form-spec '(form body)) 842;; eval: (put 'ediff-with-current-buffer 'edebug-form-spec '(form body))
842;; End: 843;; End:
843 844
844;; arch-tag: 2fe2161e-e116-469b-90fa-5cbb44c1bd1b
845;;; ediff-ptch.el ends here 845;;; ediff-ptch.el ends here
diff --git a/lisp/vc/ediff-wind.el b/lisp/vc/ediff-wind.el
index 8b16c5a4a12..4d6666a86f2 100644
--- a/lisp/vc/ediff-wind.el
+++ b/lisp/vc/ediff-wind.el
@@ -1,7 +1,8 @@
1;;; ediff-wind.el --- window manipulation utilities 1;;; ediff-wind.el --- window manipulation utilities
2 2
3;; Copyright (C) 1994, 1995, 1996, 1997, 2000, 2001, 2002, 2003, 3;; Copyright (C) 1994, 1995, 1996, 1997, 2000, 2001, 2002, 2003, 2004,
4;; 2004, 2005, 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc. 4;; 2005, 2006, 2007, 2008, 2009, 2010
5;; Free Software Foundation, Inc.
5 6
6;; Author: Michael Kifer <kifer@cs.stonybrook.edu> 7;; Author: Michael Kifer <kifer@cs.stonybrook.edu>
7;; Package: ediff 8;; Package: ediff
@@ -978,12 +979,11 @@ into icons, regardless of the window manager."
978 (set-specifier left-toolbar-width (list ctl-frame 0)) 979 (set-specifier left-toolbar-width (list ctl-frame 0))
979 (set-specifier right-toolbar-width (list ctl-frame 0)))) 980 (set-specifier right-toolbar-width (list ctl-frame 0))))
980 981
981 ;; Under OS/2 (emx) we have to call modify frame parameters twice, in order 982 ;; As a precaution, we call modify frame parameters twice, in
982 ;; to make sure that at least once we do it for non-iconified frame. If 983 ;; order to make sure that at least once we do it for
983 ;; appears that in the OS/2 port of Emacs, one can't modify frame 984 ;; a non-iconified frame. (It appears that in the Windows port of
984 ;; parameters of iconified frames. As a precaution, we do likewise for 985 ;; Emacs, one can't modify frame parameters of iconified frames.)
985 ;; windows-nt. 986 (if (eq system-type 'windows-nt)
986 (if (memq system-type '(emx windows-nt windows-95))
987 (modify-frame-parameters ctl-frame adjusted-parameters)) 987 (modify-frame-parameters ctl-frame adjusted-parameters))
988 988
989 ;; make or zap toolbar (if not requested) 989 ;; make or zap toolbar (if not requested)
@@ -1310,5 +1310,4 @@ It assumes that it is called from within the control buffer."
1310;; eval: (put 'ediff-with-current-buffer 'edebug-form-spec '(form body)) 1310;; eval: (put 'ediff-with-current-buffer 'edebug-form-spec '(form body))
1311;; End: 1311;; End:
1312 1312
1313;; arch-tag: 73d9a5d7-eed7-4d9c-8b4b-21d5d78eb597
1314;;; ediff-wind.el ends here 1313;;; ediff-wind.el ends here