anchor.diff:      )
   
   
  +#| Some experimenting indicates that, at least for queries
  +where ((action query) (prop revisions) (rvprop content)), the
  +parameters titles and revids are mutually exclusive. 
  +
  +The following implementation is therefore broken. By requiring titles,
  +it prevents you from doing queries that specified a particular
  +revision id, for instance. |#
  +
   (define-proxy get-page-content
       :core ((action query)
   	   (prop revisions)
  
positive.code:     (let ((rows (find-nodes-by-name "rev" sxml)))  
        (third (first rows))))
    :doc
      "Get the content for a given page
  
  Parameters:
    titles - the title of the page
  
negative.code:                    (a number indicating which section, not the section name)
  
   Examples: (get-page-content \"Physics\")
  
   Returns: a string with the given page content
  ")
  
  (define-proxy get-page-content-by-revid
      :core ((action query)
  	   (prop revisions)
  	   (rvprop content))
    :req (revids)
    :props (rvsection)
    :processor
    (lambda (sxml)
      (let ((rows (find-nodes-by-name "rev" sxml)))
        (third (first rows))))
    :doc
      "Get the content for a given revid
  
  Parameters:
    revids - the revision id of the page
  
    rvsection      - only retrieve the content of this section
                     (a number indicating which section, not the section name)
  
   Examples: (get-page-content 446445813)
  
   Returns: a string with the given page content
  ")
  