diff --git a/melodic.tcl b/melodic.tcl
index 8449d0d9098c547ed369983df4bbb7bcd1a1710b..5c34dc48a6a621de7f976aca5c3a2c0d42d5bcc2 100644
--- a/melodic.tcl
+++ b/melodic.tcl
@@ -332,7 +332,7 @@ button $w.btns.apply -command "melodic:apply $w" -text "Go"
 
 button $w.btns.save -command "feat_file:setup_dialog $w a a a [namespace current] *.fsf {Save Feat setup} {feat5:write $w 0 1 0} {}" -text "Save"
 
-button $w.btns.load -command "feat_file:setup_dialog $w a a a [namespace current] *.fsf {Load Feat setup} {feat5:load $w 1} {}" -text "Load"
+button $w.btns.load -command "feat_file:setup_dialog $w a a a [namespace current] *.fsf {Load Feat setup} {feat5:load $w 1 } {}" -text "Load"
 
 button $w.btns.cancel -command "destroy $w" -text "Exit"
 
@@ -387,6 +387,7 @@ if { $fmri(perfsub_yn) } {
 
 #}}}
 
+    melodic:updatelevel $w
     feat5:updateanalysis $w
     $w.nb compute_size
 }