Show
Ignore:
Timestamp:
07/29/06 07:48:34 (2 years ago)
Author:
miyoshi
Message:

Sync up with Emacs CVS HEAD.

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/lisp/gnus/nnweb.el

    r4073 r4131  
    172172                         (setq art (match-string 1 article))) 
    173173                       (when (and fetch art) 
    174                          (setq url (format fetch art)) 
     174                         (setq url (format fetch 
     175                                           (mm-url-form-encode-xwfu art))) 
    175176                         (mm-with-unibyte-current-buffer 
    176177                           (mm-url-insert url)) 
    …… 
    366367      (search-backward " - ") 
    367368      (when (looking-at 
    368              " - \\([a-zA-Z]+\\) \\([0-9]+\\)\\(?: \\([0-9]\\{4\\}\\)\\)?, [^\n]+by \\([^<\n]+\\)\n") 
     369             " - \\([a-zA-Z]+\\) \\([0-9]+\\)\\(?: \\([0-9]\\{4\\}\\)\\)?[^\n]+by ?\n?\\([^<\n]+\\)\n") 
    369370        (setq From (match-string 4) 
    370371              Date (format "%s %s 00:00:00 %s" 
    …… 
    416417            (incf i 100) 
    417418            (if (or (not (re-search-forward 
    418                           "<a href=\"\n\\([^>\" \n\t]+\\)[^<]*<img src=[^>]+next" 
     419                          "<a [^>]+href=\"\n?\\([^>\" \n\t]+\\)[^<]*<img[^>]+src=[^>]+next" 
    419420                          nil t)) 
    420421                    (>= i nnweb-max-hits)) 
    …… 
    438439    (mm-url-encode-www-form-urlencoded 
    439440     `(("q" . ,search) 
    440        ("num" . "100") 
     441       ("num" . ,(number-to-string 
     442                  (min 100 nnweb-max-hits))) 
    441443       ("hq" . "") 
    442444       ("hl" . "en")