/[emacs]/emacs/lisp/url/url-handlers.el
ViewVC logotype

Diff of /emacs/lisp/url/url-handlers.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.13 by ttn, Sat Aug 6 15:55:38 2005 UTC revision 1.14 by eliz, Thu Oct 20 14:17:14 2005 UTC
# Line 246  accessible." Line 246  accessible."
246  (url-handlers-create-wrapper file-writable-p (url))  (url-handlers-create-wrapper file-writable-p (url))
247  (url-handlers-create-wrapper file-directory-p (url))  (url-handlers-create-wrapper file-directory-p (url))
248  (url-handlers-create-wrapper file-executable-p (url))  (url-handlers-create-wrapper file-executable-p (url))
249    (url-handlers-create-wrapper directory-files (url &optional full match nosort))
250  (if (featurep 'xemacs)  (url-handlers-create-wrapper file-truename (url &optional counter prev-dirs))
     (progn  
       ;; XEmacs specific prototypes  
       (url-handlers-create-wrapper  
        directory-files (url &optional full match nosort files-only))  
       (url-handlers-create-wrapper  
        file-truename (url &optional default)))  
   ;; Emacs specific prototypes  
   (url-handlers-create-wrapper  
    directory-files (url &optional full match nosort))  
   (url-handlers-create-wrapper  
    file-truename (url &optional counter prev-dirs)))  
251    
252  (add-hook 'find-file-hook 'url-handlers-set-buffer-mode)  (add-hook 'find-file-hook 'url-handlers-set-buffer-mode)
253    

Legend:
Removed from v.1.13  
changed lines
  Added in v.1.14

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26