/******************************************************************************

    MODUL
	amiga.c

    DESCRIPTION

    NOTES

    BUGS

    TODO

    EXAMPLES

    SEE ALSO

    INDEX

    HISTORY
	10. Oct 1992	ada created

******************************************************************************/

/**************************************
		Includes
**************************************/
#include <defs.h>


/**************************************
	    Globale Variable
**************************************/


/**************************************
      Interne Defines & Strukturen
**************************************/


/**************************************
	    Interne Variable
**************************************/


/**************************************
	   Interne Prototypes
**************************************/
Prototype void set_pubscreen (void);


/*****************************************************************************

    NAME
	set_pubscreen

    PARAMETER
	void

    RESULT

    RETURN
	void

    DESCRIPTION
	Sets the name for the pubscreen XDME should open its windows on.

    NOTES

    BUGS
	This is only a dummy (Sorry).

    EXAMPLES

    SEE ALSO

    INTERNALS

    HISTORY
	10. Oct 1992	ada created

******************************************************************************/

void set_pubscreen (void)
{
    static char * name = NULL;

    if (IntuitionBase->LibNode.lib_Version < 36) {
	error ("pubscreen:\nCannot use this feature\nbefore OS2.0 !");
	return;
    }

    if (name) {
	free (name);
	name = NULL;
    }

    if (av[1][0]) {
	if (name = malloc (strlen (av[1]))) {
	    strcpy (name, av[1]);

	    PubScreenName = name;

	    sprintf (tmp_buffer, "Set PubScreen to `%s'", name);
	    title (tmp_buffer);
	}
    } else {
	PubScreenName = NULL;

	title ("turned PubScreen OFF");
    }

} /* set_pubscreen */


/******************************************************************************
*****  ENDE amiga.c
******************************************************************************/