/* <<< Start of information >>>                                             */
/* This file is part of the xplot program, a plot program for               */
/* tabulated functions which works under X.                                 */
/*                                                                          */
/* Copyright (c) ICCE / Karel Kubat 1995. All rights reserved.              */
/*                                                                          */
/* This program is free software; you can redistribute it and/or modify it  */
/* under the terms of the GNU General Public License as published by the    */
/* Free Software Foundation; either version 2 of the License, or (at your   */
/* option) any later version.                                               */
/*                                                                          */
/* You may link this software with XForms (Copyright (C) by T.C. Zhao and   */
/* Mark Overmars) and distribute the resulting binary, under the            */
/* restrictions in clause 3 of the GPL, even though the resulting binary is */
/* not, as a whole, covered by the GPL. (You still need a separate license  */
/* to do so from the owner(s) of the copyright for XForms, however).  If a  */
/* derivative no longer requires XForms, you may use the unsupplemented GPL */
/* as its license by deleting this paragraph and therefore removing this    */
/* exemption for XForms.                                                    */
/*                                                                          */
/* This program 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 General Public License for more details.                             */
/*                                                                          */
/* You should have received a copy of the GNU General Public License        */
/* along with this program; if not, write to the Free Software              */
/* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA */
/* <<< End of information >>>                                               */

#include "xplot.h"

void setactive (FL_OBJECT *ob, long d)
{
    int
	choice = fl_get_browser (ob);		    /* selected line */ 
    char const
	*line = fl_get_browser_line (ob, choice);   /* selected text */ 
    int
	activate_set;				/* activate or deact? */ 
    char
	*cp,
	buf [100];

    /* toggle the + or - in the line */ 
    strcpy (buf, line);
    for (cp = buf; *cp; cp++)
	if (*cp == '[')
	{
	    cp++;
	    break;
	}
    activate_set = *cp == '-';
    *cp = activate_set ? '+' : '-';

    /* tag data */ 
    data [choice - 1].active = activate_set;

    /* replace browser info */ 
    fl_replace_browser_line (ob, choice, buf);

    /* redraw if needed, check boundaries too */
    boundaries ();
}
    
