ACC SHELL

/**
 * File:	include/samba-client/complex.ycp
 * Package:	Configuration of samba-client
 * Summary:	Dialogs definitions
 * Authors:	Stanislav Visnovsky <visnov@suse.cz>
 *
 * $Id: complex.ycp 57773 2009-06-26 13:23:26Z jsuchome $
 */

{

textdomain "samba-client";

import "PackageSystem";
import "Samba";
import "Wizard";


include "samba-client/helps.ycp";
include "samba-client/routines.ycp";

/**
 * Return a modification status
 * @return true if data was modified
 */
boolean Modified() {
    return Samba::GetModified();
}

/**
 * Read settings dialog
 * @return `abort if aborted and `next otherwise
 */
symbol ReadDialog() {
    Wizard::RestoreHelp(HELPS["read"]:"");

    // check installed packages
    if (!PackageSystem::CheckAndInstallPackagesInteractive(["samba-client"]))
    {
	y2warning("package samba-client not installed");
        return `abort;
    }

    boolean ret = Samba::Read();
    return ret ? `next : `abort;
}

/**
 * Write settings dialog
 * @return `abort if aborted and `next otherwise
 */
symbol WriteDialog() {
    Wizard::RestoreHelp(HELPS["write"]:"");
    boolean ret = Samba::Write(false);
    return ret ? `next : `abort;
}

/* EOF */
}