From xemacs-m  Tue Feb 25 04:43:14 1997
Received: from steadfast.teradyne.com (steadfast.teradyne.com [131.101.1.200])
	by xemacs.org (8.8.5/8.8.5) with ESMTP id EAA29984
	for <xemacs-beta@xemacs.org>; Tue, 25 Feb 1997 04:43:13 -0600 (CST)
Received: from engine.ecf.teradyne.com (engine.ecf.teradyne.com [131.101.192.6]) by steadfast.teradyne.com (8.7.1/8.7.1) with ESMTP id FAA07558 for <xemacs-beta@xemacs.org>; Tue, 25 Feb 1997 05:46:26 -0500 (EST)
Received: from midnight.eng.ecf.teradyne.com (midnight.ecf.teradyne.com [131.101.192.49]) by engine.ecf.teradyne.com (8.7.1/8.7.1) with SMTP id LAA25046; Tue, 25 Feb 1997 11:42:35 +0100 (MET)
Received: by midnight.eng.ecf.teradyne.com (SMI-8.6/SMI-SVR4)
	id LAA17848; Tue, 25 Feb 1997 11:42:34 +0100
To: XEmacs Beta Mailing List <xemacs-beta@xemacs.org>
Subject: xemacs-20.1-b2/etc/sample.emacs's has broken ange/efs logic
References: <199702250111.UAA15972@blight.IntraNet.com>
X-Face: 4[iHdXiTu\V3u[~\I)<f9HC);%~nG8`oUqv#uzvs6=\V{AjN6Sn
 c/qi;YLwRmEbt8Y*=j5n(urqY@chPh@J'D"QlqD!C8>*}#kYF[-tYl3VZga/HSOP|K,{L
 Rtu@f0y/=O&Cu}\:~d|P$JON?pn?j,&CnPb1z#/TL9bkAJwyol&a:SvYj-VYbM=Dtxhk9
 =w|R6U3_;SH&B<Mfy6Q%#
Mime-Version: 1.0 (generated by tm-edit 7.105)
Content-Type: multipart/mixed;
 boundary="Multipart_Tue_Feb_25_11:42:32_1997-1"
Content-Transfer-Encoding: 7bit
From: Adrian Aichner <aichner@ecf.teradyne.com>
Date: 25 Feb 1997 11:42:32 +0100
Message-ID: <rxsu3n1xj3b.fsf@midnight.ecf.teradyne.com>
Lines: 109
X-Mailer: Gnus v5.4.15/XEmacs 20.1

--Multipart_Tue_Feb_25_11:42:32_1997-1
Content-Type: text/plain; charset=US-ASCII


Hello All,

it appears to me that the decision whether to `require'
efs-auto
or
ange-ftp
is completely wrong in sample.emacs as it comes with
emacs-version
"20.1 XEmacs Lucid (beta2)"

Here is my patch which is verified to work for at least the above
mentioned version.


--Multipart_Tue_Feb_25_11:42:32_1997-1
Content-Type: application/octet-stream
Content-Disposition: attachment; filename="*ediff-custom-diff*"
Content-Transfer-Encoding: 7bit

*** /tmp/sample.emacs.~1.1~a004Lc	Tue Feb 25 11:08:46 1997
--- /tmp/sample.emacsa004Lc	Tue Feb 25 11:08:46 1997
***************
*** 368,374 ****
  ;; constructed using the environment variables USER and DOMAINNAME
  ;; (e.g. turner@lanl.gov), if set.
  
! (if (and running-xemacs (< emacs-major-version 20) (>= emacs-minor-version 15))
      (progn
        (message "Loading and configuring bundled packages... efs")
        (require 'efs-auto)
--- 368,376 ----
  ;; constructed using the environment variables USER and DOMAINNAME
  ;; (e.g. turner@lanl.gov), if set.
  
! (if (and running-xemacs
! 	 (or (and (= emacs-major-version 20) (>= emacs-minor-version 1))
! 	     (and (= emacs-major-version 19) (>= emacs-minor-version 15))))
      (progn
        (message "Loading and configuring bundled packages... efs")
        (require 'efs-auto)
***************
*** 380,401 ****
  		 (getenv "DOMAINNAME"))
  	    (setq efs-generate-anonymous-password
  		  (concat (getenv "USER")"@"(getenv "DOMAINNAME")))))
!       (setq efs-auto-save 1)
!       ))
! (if (and running-xemacs (< emacs-major-version 20) (< emacs-minor-version 15))
!     (progn
!       (message "Loading and configuring bundled packages... ange-ftp")
!       (require 'ange-ftp)
!       (if (getenv "USER")
! 	  (setq ange-ftp-default-user (getenv "USER")))
!       (if (getenv "EMAIL_ADDRESS")
! 	  (setq ange-ftp-generate-anonymous-password (getenv "EMAIL_ADDRESS"))
! 	(if (and (getenv "USER")
! 		 (getenv "DOMAINNAME"))
! 	    (setq ange-ftp-generate-anonymous-password
! 		  (concat (getenv "USER")"@"(getenv "DOMAINNAME")))))
!       (setq ange-ftp-auto-save 1)
!       )
    )
  
  
--- 382,401 ----
  		 (getenv "DOMAINNAME"))
  	    (setq efs-generate-anonymous-password
  		  (concat (getenv "USER")"@"(getenv "DOMAINNAME")))))
!       (setq efs-auto-save 1))
!   (progn
!     (message "Loading and configuring bundled packages... ange-ftp")
!     (require 'ange-ftp)
!     (if (getenv "USER")
! 	(setq ange-ftp-default-user (getenv "USER")))
!     (if (getenv "EMAIL_ADDRESS")
! 	(setq ange-ftp-generate-anonymous-password (getenv "EMAIL_ADDRESS"))
!       (if (and (getenv "USER")
! 	       (getenv "DOMAINNAME"))
! 	  (setq ange-ftp-generate-anonymous-password
! 		(concat (getenv "USER")"@"(getenv "DOMAINNAME")))))
!     (setq ange-ftp-auto-save 1)
!     )
    )
  
  

--Multipart_Tue_Feb_25_11:42:32_1997-1
Content-Type: text/plain; charset=US-ASCII



It might well be that this problem caused the ediff problem reported
(see the References: list).

Later,

Adrian

-- 
  Teradyne GmbH               Adrian Aichner Applications Engineer
  Semiconductor Test Group    Telephone      +49/89/418 61 (0)-208
  Dingolfinger Strasse 2      Fax            +49/89/418 61-217
  D-81673 M"UNCHEN            E-mail         aichner@ecf.teradyne.com

--Multipart_Tue_Feb_25_11:42:32_1997-1--

