Mercurial > hg > xemacs-beta
diff lisp/w3/url-cookie.el @ 44:8d2a9b52c682 r19-15prefinal
Import from CVS: tag r19-15prefinal
author | cvs |
---|---|
date | Mon, 13 Aug 2007 08:55:10 +0200 |
parents | 1a767b41a199 |
children |
line wrap: on
line diff
--- a/lisp/w3/url-cookie.el Mon Aug 13 08:54:52 2007 +0200 +++ b/lisp/w3/url-cookie.el Mon Aug 13 08:55:10 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