From: <mth...@us...> - 2009-07-26 17:12:42
|
Revision: 10278 http://openmsx.svn.sourceforge.net/openmsx/?rev=10278&view=rev Author: mthuurne Date: 2009-07-26 17:12:28 +0000 (Sun, 26 Jul 2009) Log Message: ----------- Inlined "menu_refresh_helper" into its only caller, "menu_refresh_top". Modified Paths: -------------- openmsx/trunk/share/scripts/osd_menu.tcl Modified: openmsx/trunk/share/scripts/osd_menu.tcl =================================================================== --- openmsx/trunk/share/scripts/osd_menu.tcl 2009-07-26 17:08:28 UTC (rev 10277) +++ openmsx/trunk/share/scripts/osd_menu.tcl 2009-07-26 17:12:28 UTC (rev 10278) @@ -107,12 +107,8 @@ proc menu_refresh_top {} { variable menuinfos - menu_refresh_helper [lindex $menuinfos end] -} + unpack_menu_info [lindex $menuinfos end] -proc menu_refresh_helper { menuinfo } { - unpack_menu_info $menuinfo - foreach { osdid text } $menutexts { set cmd [list subst $text] osd configure $osdid -text [uplevel #0 $cmd] This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. |