--- ./snavigator/gui/projmng.tcl	2010-03-14 19:27:02.000000000 +0100
+++ ./snavigator/gui/projmng.tcl.mod	2010-03-14 19:26:59.000000000 +0100
@@ -454,7 +454,7 @@
     global tcl_platform
 
     #read project list
-    set proj_list [sn_read_exist_projects]
+    set proj_list [lsort [sn_read_exist_projects]]
 
     set t .sn_open_proj
     if {[winfo exists ${t}]} {