Ignore:
Timestamp:
08/10/08 17:12:27 (12 years ago)
Author:
sjamaan
Message:

Rename set-header-contents! to update-header-contents! and create a nondestructive variant of it too
Fix definitions for a few header parsers

File:
1 edited

Legend:

Unmodified
Added
Removed
  • release/4/intarweb/trunk/header-parsers.scm

    r11579 r11592  
    152152(define (single other-parser #!optional (parameter-parsers '()))
    153153  (lambda (name contents headers)
    154     (set-header-contents!
     154    (update-header-contents!
    155155     name
    156156     ((with-params other-parser parameter-parsers) contents)
     
    248248;; This too
    249249(define (pragma-parser name value headers)
    250   (set-header-contents! name (read-parameters value 0 `()) headers))
     250  (update-header-contents! name (read-parameters value 0 `()) headers))
    251251
    252252;; This one includes q parser
    253253(define (te-parser name value headers)
    254   (set-header-contents! name (read-parameters value 0 `((q . ,quality-parser))) headers))
     254  (update-header-contents! name (read-parameters value 0 `((q . ,quality-parser))) headers))
    255255
    256256;; Cookie headers are also braindead: there can be several cookies in one header,
Note: See TracChangeset for help on using the changeset viewer.