Mercurial > hg > xemacs-beta
diff lisp/ediff/ediff-init.el @ 82:6a378aca36af r20-0b91
Import from CVS: tag r20-0b91
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:07:36 +0200 |
parents | 1ce6082ce73f |
children | 4be1180a9e89 |
line wrap: on
line diff
--- a/lisp/ediff/ediff-init.el Mon Aug 13 09:06:45 2007 +0200 +++ b/lisp/ediff/ediff-init.el Mon Aug 13 09:07:36 2007 +0200 @@ -1,6 +1,6 @@ ;;; ediff-init.el --- Macros, variables, and defsubsts used by Ediff -;; Copyright (C) 1994, 1995, 1996 Free Software Foundation, Inc. +;; Copyright (C) 1994, 1995, 1996, 1997 Free Software Foundation, Inc. ;; Author: Michael Kifer <kifer@cs.sunysb.edu> @@ -32,6 +32,10 @@ (defvar ediff-mouse-pixel-threshold) (defvar ediff-whitespace) (defvar ediff-multiframe) + +(and noninteractive + (eval-when-compile + (load "ange-ftp" 'noerror))) ;; end pacifier ;; Is it XEmacs? @@ -90,7 +94,7 @@ (ediff-defvar-local ediff-buffer-C nil "") ;; Ancestor buffer (ediff-defvar-local ediff-ancestor-buffer nil "") -;; The control buffer of ediff. +;; The Ediff control buffer (ediff-defvar-local ediff-control-buffer nil "") ;;; Macros @@ -625,8 +629,8 @@ ;;;; warn if it is a wrong version of emacs -;;(if (or (ediff-check-version '< 19 29 'emacs) -;; (ediff-check-version '< 19 12 'xemacs)) +;;(if (or (ediff-check-version '< 19 35 'emacs) +;; (ediff-check-version '< 19 15 'xemacs)) ;; (progn ;; (with-output-to-temp-buffer ediff-msg-buffer ;; (switch-to-buffer ediff-msg-buffer) @@ -635,9 +639,9 @@ ;; ;;This version of Ediff requires ;; -;;\t Emacs 19.29 and higher +;;\t Emacs 19.35 and higher ;;\t OR -;;\t XEmacs 19.12 and higher +;;\t XEmacs 19.15 and higher ;; ;;It is unlikely to work under Emacs version %s ;;that you are using... " emacs-version))