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

Diff of /emacs/lisp/url/url.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 rms, Sat Oct 15 14:48:17 2005 UTC
# Line 30  Line 30 
30  ;;; Code:  ;;; Code:
31    
32  (eval-when-compile (require 'cl))  (eval-when-compile (require 'cl))
 ;; Don't require CL at runtime if we can avoid it (Emacs 21).  
 ;; Otherwise we need it for hashing functions.  `puthash' was never  
 ;; defined in the Emacs 20 cl.el for some reason.  
 (if (fboundp 'puthash)  
     nil                                 ; internal or CL is loaded  
   (defalias 'puthash 'cl-puthash)  
   (autoload 'cl-puthash "cl")  
   (autoload 'gethash "cl")  
   (autoload 'maphash "cl")  
   (autoload 'make-hash-table "cl"))  
33    
34  (eval-when-compile  (eval-when-compile
35    (require 'mm-decode)    (require 'mm-decode)

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