diff --git a/fix-sequences.sql b/fix-sequences.sql
new file mode 100644
index 0000000..b76a588
--- /dev/null
+++ b/fix-sequences.sql
@@ -0,0 +1,4 @@
+--running this script will generate sql which will fix broken sequences for a postgres database... (tested on postgres 8.4)
+
+select 'SELECT setval('''||ns.nspname||'.'||cs.relname||''', max("'||attname||'")) FROM "'||ns.nspname||'"."'||c.relname||'";' from pg_class c, pg_class cs, pg_attribute a, pg_attrdef d, pg_namespace ns where c.relnamespace = ns.oid and cs.relkind = 'S' and d.adsrc ~ cs.relname and c.oid = a.attrelid and c.oid = d.adrelid and d.adnum = a.attnum;
+