Mercurial > emacs
comparison lisp/ediff-vers.el @ 35109:1b58126efb71
(noninteractive): Don't load generic-sc on MS-DOS
systems without long file-name support.
| author | Eli Zaretskii <eliz@gnu.org> |
|---|---|
| date | Sat, 06 Jan 2001 21:43:25 +0000 |
| parents | f8c8c2d3538e |
| children | 7a94f1c588c4 |
comparison
equal
deleted
inserted
replaced
| 35108:3e97804526ed | 35109:1b58126efb71 |
|---|---|
| 34 | 34 |
| 35 (and noninteractive | 35 (and noninteractive |
| 36 (eval-when-compile | 36 (eval-when-compile |
| 37 (load "pcl-cvs" 'noerror) | 37 (load "pcl-cvs" 'noerror) |
| 38 (load "rcs" 'noerror) | 38 (load "rcs" 'noerror) |
| 39 (load "generic-sc" 'noerror) | 39 ;; On 8+3 MS-DOS filesystems, generic-x.el is loaded |
| 40 ;; instead of (the missing) generic-sc.el. Since the | |
| 41 ;; version of Emacs which supports MS-DOS doesn't have | |
| 42 ;; generic-sc, we simply avoid loading it. | |
| 43 (or (and (fboundp 'msdos-long-file-names) | |
| 44 (not (msdos-long-file-names))) | |
| 45 (load "generic-sc" 'noerror)) | |
| 40 (load "vc" 'noerror))) | 46 (load "vc" 'noerror))) |
| 41 ;; end pacifier | 47 ;; end pacifier |
| 42 | 48 |
| 43 ;; VC.el support | 49 ;; VC.el support |
| 44 (defun ediff-vc-internal (rev1 rev2 &optional startup-hooks) | 50 (defun ediff-vc-internal (rev1 rev2 &optional startup-hooks) |