[Emacs-diffs] Changes to emacs/lisp/url/url-util.el [emacs-unicode-2]

[Miles Bader]

Index: emacs/lisp/url/url-util.el
diff -c emacs/lisp/url/url-util.el:1.4.2.2 emacs/lisp/url/url-util.el:1.4.2.3
*** emacs/lisp/url/url-util.el:1.4.2.2  Thu Oct 14 08:49:52 2004
--- emacs/lisp/url/url-util.el  Fri Oct 22 10:13:34 2004
***************
*** 192,204 ****
                                                (nth 1 (current-time-zone))
                                                "GMT"))
         (parsed (timezone-parse-date gmt))
!        (day (cdr-safe (assoc (substring raw 0 3) weekday-alist)))
         (year nil)
         (month (car
                 (rassoc
!                 (string-to-int (aref parsed 1)) monthabbrev-alist)))
         )
!     (setq day (or (car-safe (rassoc day weekday-alist))
                  (substring raw 0 3))
          year (aref parsed 0))
      ;; This is needed for plexus servers, or the server will hang trying to
--- 192,204 ----
                                                (nth 1 (current-time-zone))
                                                "GMT"))
         (parsed (timezone-parse-date gmt))
!        (day (cdr-safe (assoc (substring raw 0 3) url-weekday-alist)))
         (year nil)
         (month (car
                 (rassoc
!                 (string-to-int (aref parsed 1)) url-monthabbrev-alist)))
         )
!     (setq day (or (car-safe (rassoc day url-weekday-alist))
                  (substring raw 0 3))
          year (aref parsed 0))
      ;; This is needed for plexus servers, or the server will hang trying to