Changeset 6264 for trunk

Timestamp:

Apr 13, 2016 10:30:26 AM (8 years ago)

Author:

ldelgass

Message:

set map description

File:

• trunk/gui/scripts/map.tcl (modified) (3 diffs)

trunk/gui/scripts/map.tcl

@@ -50 +50 @@
     public method setAttribution { attribution }
     public method setCamera { camera }
+    public method setDescription { description }
     public method setExtents { xmin ymin xmax ymax {srs "wgs84"} }
     public method setLabel { label }
@@ -147 +148 @@
     # Set global map properties
     setLabel [$map get "about.label"]
+    setDescription [$map get "about.description"]
     setAttribution [$map get "about.attribution"]
 
@@ -506 +508 @@
 }
 
+itcl::body Rappture::Map::setDescription { description } {
+    $_tree set root "description" $description
+}
+
 itcl::body Rappture::Map::setAttribution { attribution } {
     $_tree set root "attribution" $attribution