From c6e74ef695f8b1c567275f175e31be39a456e536 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?J=C3=A9r=C3=A9my=20Zurcher?= <jeremy@asynk.ch>
Date: Tue, 17 Jun 2014 16:19:38 +0200
Subject: dia2pg : support field comment tag default=_expr_

---
 dia2pg.rb | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/dia2pg.rb b/dia2pg.rb
index e52ad0c..a26fc6d 100755
--- a/dia2pg.rb
+++ b/dia2pg.rb
@@ -189,6 +189,13 @@ class Attribute
         @comment=~/no_export=1/
     end
     #
+    def default
+        return '' if @comment.nil?
+        @comment=~/default=(.*)$/
+        return '' if $1.nil?
+        return " DEFAULT "+$1.to_s
+    end
+    #
     def real_name
         if not no_rename? and foreign?
             rl = RELATIONS.find { |r| r.tbl_to==@tbl and r.attr_to.name==@name }
@@ -227,6 +234,7 @@ class Attribute
         else
             r << "#{type} NOT NULL"
         end
+        r << default
         r << ",\n"
     end
     #
-- 
cgit v1.1-2-g2b99