format web links and numbers as such in excel download. Format based …

…on actual data, not field settings.

Products/PloneFormGen/content/saveDataAdapter.py

@@ -9,6 +9,8 @@
 except ImportError:
     has_xls = False
 
+from urlparse import urlparse
+
 from AccessControl import ClassSecurityInfo
 
 from BTrees.IOBTree import IOBTree
@@ -466,6 +468,17 @@ def download_xls(self, REQUEST=None, RESPONSE=None):
             for col_num, col in enumerate(row):
                 if type(col) is unicode:
                     col = col.encode(self.getCharset())
+
+                if urlparse(col).scheme in ('http', 'https'):
+                    col = xlwt.Formula('HYPERLINK("%(url)s")' % dict(url=col))
+                else:
+                    for format in (int, float):
+                        try:
+                            col = format(col)
+                            break
+                        except ValueError:
+                            pass
+
                 sheet.write(row_num, col_num, col)
             row_num += 1