Patch for load error in efs.el

sandy@ibm550.sissa.it
Mon, 13 Jun 1994 17:36:54 +0200


Roland caught a bug in efs.el of 1.8 that causes a load error if you
try to use it with the diff.el supplied with Emacs 19.

Here is a patch:

---------------cut here----------------------------------------
*** /u/fm/sandy/efs/1.8/efs-1.8/efs.el~	Fri Jun 10 19:49:20 1994
--- /u/fm/sandy/efs/1.8/efs-1.8/efs.el	Mon Jun 13 17:31:56 1994
***************
*** 9537,9549 ****
  
  ;;; We are using our own diff.el, so this doesn't depend on Emacs flavour.
  
! (if (featurep 'diff)
      (efs-overwrite-fn "efs" 'diff-del-temp-file 'efs-diff/grep-del-temp-file)
    (add-hook 'diff-load-hook
  	    (function
  	     (lambda ()
! 	       (efs-overwrite-fn "efs" 'diff-del-temp-file
! 				 'efs-diff/grep-del-temp-file)))))
  
  ;;;; ------------------------------------------------------------
  ;;;; Add to minor-mode-alist.
--- 9537,9551 ----
  
  ;;; We are using our own diff.el, so this doesn't depend on Emacs flavour.
  
! ;; Can't test featurep 'diff, in case there are other diffs.
! (if (fboundp 'diff-del-temp-file)
      (efs-overwrite-fn "efs" 'diff-del-temp-file 'efs-diff/grep-del-temp-file)
    (add-hook 'diff-load-hook
  	    (function
  	     (lambda ()
! 	       (and (fboundp 'diff-del-temp-file)
! 		    (efs-overwrite-fn "efs" 'diff-del-temp-file
! 				      'efs-diff/grep-del-temp-file))))))
  
  ;;;; ------------------------------------------------------------
  ;;;; Add to minor-mode-alist.