Mercurial > hg > xemacs-beta

diff lisp/w3/url-cookie.el @ 116:9f59509498e1 r20-1b10

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b10
author cvs
date Mon, 13 Aug 2007 09:23:06 +0200
parents 8619ce7e4c50
children 9b50b4588a93
line wrap: on
line diff
--- a/lisp/w3/url-cookie.el	Mon Aug 13 09:21:56 2007 +0200
+++ b/lisp/w3/url-cookie.el	Mon Aug 13 09:23:06 2007 +0200
@@ -1,7 +1,7 @@
 ;;; url-cookie.el --- Netscape Cookie support
 ;; Author: wmperry
-;; Created: 1997/03/19 00:42:23
-;; Version: 1.14
+;; Created: 1997/03/26 00:06:01
+;; Version: 1.15
 ;; Keywords: comm, data, processes, hypermedia
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
@@ -374,12 +374,6 @@
       (let ((cur nil))
 	(while rest
 	  (setq cur (pop rest))
-	  ;; Oh gross, this is for microsoft & netscape.
-	  ;; Fuck them fuck them fuchk them fuck them.
-	  (if (string-match "^\\([^=]+\\)=\\(.*\\)" (cdr cur))
-	      (setq rest (cons (cons (match-string 1 (cdr cur))
-				     (match-string 2 (cdr cur))) rest)
-		    cur (cons (car cur) "")))
 	  (url-cookie-store (car cur) (cdr cur)
 			    expires domain path secure))))
      (t