Support initial date range specification in XML

src/daterangeselector.w

 		DateRangeSelector(QWidget *parent = NULL);
 		void setCustomRange(QVariant range);
 		Q_INVOKABLE QVariant currentRange();@/
+	@[public slots@]:@/
+		void setCurrentIndex(int index);@/
 	@[signals@]:@/
 		void rangeUpdated(QVariant);
 	@[private slots@]:@/
 	return quickSelector->itemData(lastIndex);
 }
 
+@ Similarly, a method is provided to set the current index of the combo box.
+
+@<DateRangeSelector implementation@>=
+void DateRangeSelector::setCurrentIndex(int index)
+{
+	quickSelector->setCurrentIndex(index);
+}
+
 @ To use this new control in Typica, we should provide a way to create it from
 the XML description of a window.
 
 }
 
 @ The method for adding a date range selector to a layout is currently trivial.
-Additional features may be added to this in the future to provide better
-support for specifying an initial default selection. At present the only
-supported attribute is the |"id"| attribute which is used to make the widget
-accessible to scripts.
+The |"id"| attribute is supported as usual, as is an |"initial"| attribute for
+setting the combo box index.
 
 @<Functions for scripting@>=
 void addDateRangeToLayout(QDomElement element, QStack<QWidget *> *,@|
 	{
 		widget->setObjectName(element.attribute("id"));
 	}
+	if(element.hasAttribute("initial"))
+	{
+		widget->setCurrentIndex(element.attribute("initial").toInt());
+	}
 	QBoxLayout *layout = qobject_cast<QBoxLayout *>(layoutStack->top());
 	layout->addWidget(widget);
 }