[yast-commit] r64536 - /branches/SuSE-Code-11-SP2-Branch/ldap-server/src/mirrormode-wizard.ycp
Author: rhafer Date: Wed Jun 22 11:50:20 2011 New Revision: 64536 URL: http://svn.opensuse.org/viewcvs/yast?rev=64536&view=rev Log: Ask of confirmation before deleteing a host from the list Modified: branches/SuSE-Code-11-SP2-Branch/ldap-server/src/mirrormode-wizard.ycp Modified: branches/SuSE-Code-11-SP2-Branch/ldap-server/src/mirrormode-wizard.ycp URL: http://svn.opensuse.org/viewcvs/yast/branches/SuSE-Code-11-SP2-Branch/ldap-server/src/mirrormode-wizard.ycp?rev=64536&r1=64535&r2=64536&view=diff ============================================================================== --- branches/SuSE-Code-11-SP2-Branch/ldap-server/src/mirrormode-wizard.ycp (original) +++ branches/SuSE-Code-11-SP2-Branch/ldap-server/src/mirrormode-wizard.ycp Wed Jun 22 11:50:20 2011 @@ -116,16 +116,23 @@ continue; } - LdapServer::RemoveMMSyncrepl( serverids[ selected, "uri" ]:"" ); - serverids = remove( serverids, selected ); - LdapServer::WriteServerIds( serverids ); - itemlist = maplist (map v, serverids, - { - pos=pos+1; - return `item( `id(pos), v["id"]:-1 , v["uri"]:""); - } - ); - UI::ChangeWidget( `serverid_tab, `Items, itemlist) ; + if( Popup::YesNo( _("Do you really want to remove ") + + "\"" + serverids[ selected, "uri" ]:"" + "\"" + + _("From the MirrorMode setup?\n" ) + + _("Changes will take effect immediately after clicking \"Yes\"") ) ) + { + LdapServer::RemoveMMSyncrepl( serverids[ selected, "uri" ]:"" ); + serverids = remove( serverids, selected ); + LdapServer::WriteServerIds( serverids ); + itemlist = maplist (map v, serverids, + { + pos=pos+1; + return `item( `id(pos), v["id"]:-1 , v["uri"]:""); + } + ); + UI::ChangeWidget( `serverid_tab, `Items, itemlist) ; + Wizard::HideAbortButton(); + } } } } -- To unsubscribe, e-mail: yast-commit+unsubscribe@opensuse.org For additional commands, e-mail: yast-commit+help@opensuse.org
participants (1)
-
rhafer@svn2.opensuse.org