anchor.diff:  	(coordinates ()
   	  (format nil "~F,~F,0" (lon m) (lat m)))))
       (cl:when (addr m)
  -      (kml:address () (addr m)))
  +      (address () (addr m)))
       (description () (desc m))
       (style ()
         (iconstyle ()
  
positive.code: 		    ,s))
  	     (collect `(export ',s :kml)))))
  
  (kml-tags "AbstractView" "address" "AddressDetails" "Alias" "altitude"
  	  "altitudeMode" "BalloonStyle" "begin" "bgColor" "bottomFov" "Camera"
  	  "Change" "color" "colorMode" "ColorStyle" "Container" "cookie" "coordinates"
  	  "Create" "Data" "Delete" "description" "displayMode" "displayName" "Document"
  
negative.code: (in-package :net.acceleration.buildnode)
  
  (buildnode::eval-always
    (unless (find-package :net.acceleration.buildnode.kml)
      (defpackage :net.acceleration.buildnode.kml
  	(:nicknames :kml :buildnode-kml)
  