Author: rhafer Date: Tue Sep 9 15:01:34 2008 New Revision: 50896 URL: http://svn.opensuse.org/viewcvs/yast?rev=50896&view=rev Log: ask before aborting Modified: trunk/ldap-server/src/dialogs.ycp trunk/ldap-server/src/wizards.ycp Modified: trunk/ldap-server/src/dialogs.ycp URL: http://svn.opensuse.org/viewcvs/yast/trunk/ldap-server/src/dialogs.ycp?rev=50896&r1=50895&r2=50896&view=diff ============================================================================== --- trunk/ldap-server/src/dialogs.ycp (original) +++ trunk/ldap-server/src/dialogs.ycp Tue Sep 9 15:01:34 2008 @@ -270,10 +270,21 @@ ret = UI::UserInput(); y2milestone( "TlsConfigDialog: seeing return value '%1'", ret ); - if( ret == `back || ret == `abort || ret == `cancel) + if( ret == `back ) { break; } + if( ret == `abort || ret == `cancel ) + { + if( Popup::ReallyAbort(true) ) + { + break; + } + else + { + continue; + } + } else if( ret == `next || ret == `finish ) { if (! cb_write_tls() ) Modified: trunk/ldap-server/src/wizards.ycp URL: http://svn.opensuse.org/viewcvs/yast/trunk/ldap-server/src/wizards.ycp?rev=50896&r1=50895&r2=50896&view=diff ============================================================================== --- trunk/ldap-server/src/wizards.ycp (original) +++ trunk/ldap-server/src/wizards.ycp Tue Sep 9 15:01:34 2008 @@ -73,6 +73,7 @@ "ws_start" : "startup", "startup" : $[ `next : "tlssettings", + `abort : `abort, `finish : `abort ], "tlssettings" : $[ -- To unsubscribe, e-mail: yast-commit+unsubscribe@opensuse.org For additional commands, e-mail: yast-commit+help@opensuse.org