Index: openacs-4/packages/survey/www/admin/question-add-3.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/survey/www/admin/question-add-3.tcl,v diff -u -r1.6 -r1.6.2.1 --- openacs-4/packages/survey/www/admin/question-add-3.tcl 6 Nov 2013 07:33:54 -0000 1.6 +++ openacs-4/packages/survey/www/admin/question-add-3.tcl 8 Apr 2014 08:06:39 -0000 1.6.2.1 @@ -105,7 +105,10 @@ set sort_order [expr { $after + 1 }] db_dml renumber_sort_orders {} } else { - set sort_order [expr {[db_string max_question {}] + 1}] + set sort_order [db_string max_question {}] + if { $sort_order eq ""} { + set sort_order 1 + } } db_exec_plsql create_question {}