-** EFS
-
-Here is the patch to make EFS work with SXEmacs:
-
-(Note: the current EFS package that XEmacs distributes has this
-patch installed)
-
-Index: ChangeLog
-===================================================================
-RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/efs/ChangeLog,v
-retrieving revision 1.41
-diff -u -U0 -r1.41 ChangeLog
---- ChangeLog 4 Oct 2004 08:54:56 -0000 1.41
-+++ ChangeLog 14 Jan 2005 02:43:10 -0000
-@@ -0,0 +1,6 @@
-+2005-01-14 Steve Youngs <steve@sxemacs.org>
-+
-+ * efs-fnh.el (efs-handle-emacs-version): Use `emacs-*-version'
-+ variables for version info instead of string-matching through
-+ `emacs-version'.
-+
-Index: efs-fnh.el
-===================================================================
-RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/efs/efs-fnh.el,v
-retrieving revision 1.13
-diff -u -u -r1.13 efs-fnh.el
---- efs-fnh.el 2 Oct 2004 14:06:00 -0000 1.13
-+++ efs-fnh.el 14 Jan 2005 02:42:59 -0000
-@@ -36,15 +36,17 @@
- (let ((ehev-match-data (match-data)))
- (unwind-protect
- (let ((xemacsp (string-match "XEmacs" emacs-version))
-- ver subver)
-- (or (string-match "^\\([0-9]+\\)\\.\\([0-9]+\\)" emacs-version)
-- (error "efs does not work with emacs version %s" emacs-version))
-- (setq ver (string-to-int (substring emacs-version
-- (match-beginning 1)
-- (match-end 1)))
-- subver (string-to-int (substring emacs-version
-- (match-beginning 2)
-- (match-end 2))))
-+ (ver emacs-major-version)
-+ (subver emacs-minor-version))
-+ (unless ver
-+ (or (string-match "^\\([0-9]+\\)\\.\\([0-9]+\\)" emacs-version)
-+ (error "efs does not work with emacs version %s" emacs-version))
-+ (setq ver (string-to-int (substring emacs-version
-+ (match-beginning 1)
-+ (match-end 1)))
-+ subver (string-to-int (substring emacs-version
-+ (match-beginning 2)
-+ (match-end 2)))))
- (cond
-
- ;; XEmacs (emacs-version looks like \"19.xx XEmacs\")
-
-** Dired
-
-Here is the patch to make Dired work with SXEmacs:
-
-(Note: the current Dired package that XEmacs distributes has this
-patch installed)
-
-Index: ChangeLog
-===================================================================
-RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/dired/ChangeLog,v
-retrieving revision 1.19
-diff -u -U0 -r1.19 ChangeLog
---- ChangeLog 4 Oct 2004 08:54:24 -0000 1.19
-+++ ChangeLog 14 Jan 2005 02:37:37 -0000
-@@ -0,0 +1,7 @@
-+2005-01-14 Steve Youngs <steve@sxemacs.org>
-+
-+ * dired.el: Use `emacs-*-version' variables for finding version
-+ information instead of string-matching through `emacs-version'.
-+
-+ * diff.el (diff-emacs-19-p): Ditto.
-+
-Index: diff.el
-===================================================================
-RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/dired/diff.el,v
-retrieving revision 1.4
-diff -u -u -r1.4 diff.el
---- diff.el 2 Oct 2004 14:06:17 -0000 1.4
-+++ diff.el 14 Jan 2005 02:37:23 -0000
-@@ -72,7 +72,7 @@
- ;;; Internal variables
-
- (defconst diff-emacs-19-p
-- (let ((ver (string-to-int (substring emacs-version 0 2))))
-+ (let ((ver emacs-major-version))
- (>= ver 19)))
-
- (or diff-emacs-19-p (require 'emacs-19))
-Index: dired.el
-===================================================================
-RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/dired/dired.el,v
-retrieving revision 1.7
-diff -u -u -r1.7 dired.el
---- dired.el 2 Oct 2004 14:06:19 -0000 1.7
-+++ dired.el 14 Jan 2005 02:37:25 -0000
-@@ -80,13 +80,15 @@
- ;; Testing against the string `Lucid' breaks InfoDock. How many years has
- ;; it been since Lucid went away?
- (let ((lucid-p (string-match "XEmacs" emacs-version))
-- ver subver)
-- (or (string-match "^\\([0-9]+\\)\\.\\([0-9]+\\)" emacs-version)
-- (error "dired does not work with emacs version %s" emacs-version))
-- (setq ver (string-to-int (substring emacs-version (match-beginning 1)
-- (match-end 1)))
-- subver (string-to-int (substring emacs-version (match-beginning 2)
-- (match-end 2))))
-+ (ver emacs-major-version)
-+ (subver emacs-minor-version))
-+ (unless ver
-+ (or (string-match "^\\([0-9]+\\)\\.\\([0-9]+\\)" emacs-version)
-+