CASA/yast2-CASA/src/dialogs.ycp

116 lines
2.7 KiB
Plaintext

/**
* File: include/CASA/dialogs.ycp
* Package: Configuration of CASA
* Summary: Dialogs definitions
* Authors: casa <casa@novell.com>
*
*********************************************************************
* Copyright (C) 2005-2006 Novell, Inc. All Rights Reserved.
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; version 2.1
* of the License.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Library Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, Novell, Inc.
*
* To contact Novell about this file by physical or electronic mail,
* you may find current contact information at www.novell.com.
*
*********************************************************************
*
*/
{
textdomain "CASA";
import "Label";
import "Wizard";
import "NovellCasa";
include "CASA/helps.ycp";
/**
* Configure1 dialog
* @return dialog result
*/
any Configure1Dialog () {
/* NovellCasa configure1 dialog caption */
string caption = _("CASA Configuration");
/* NovellCasa configure1 dialog contents */
term contents = `Label (_("First part of configuration of CASA"));
Wizard::SetContentsButtons(caption, contents, HELPS["c1"]:"",
Label::BackButton(), Label::NextButton());
any ret = nil;
while(true) {
ret = UI::UserInput();
/* abort? */
if(ret == `abort || ret == `cancel) {
if(ReallyAbort()) break;
else continue;
}
else if(ret == `next || ret == `back) {
break;
}
else {
y2error("unexpected retcode: %1", ret);
continue;
}
}
return ret;
}
/**
* Configure2 dialog
* @return dialog result
*/
any Configure2Dialog () {
/* NovellCasa configure2 dialog caption */
string caption = _("CASA Configuration");
/* NovellCasa configure2 dialog contents */
term contents = `Label (_("Second part of configuration of CASA"));
Wizard::SetContentsButtons(caption, contents, HELPS["c2"]:"",
Label::BackButton(), Label::NextButton());
any ret = nil;
while(true) {
ret = UI::UserInput();
/* abort? */
if(ret == `abort || ret == `cancel) {
if(ReallyAbort()) break;
else continue;
}
else if(ret == `next || ret == `back) {
break;
}
else {
y2error("unexpected retcode: %1", ret);
continue;
}
}
return ret;
}
/* EOF */
}