[rkward-cvs] rkward/rkward/plugins/00saveload/save/skeleton code.php,NONE,1.1 description.xml,NONE,1.1

[adrien]

Update of /cvsroot/rkward/rkward/rkward/plugins/00saveload/save/skeleton
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29879/rkward/plugins/00saveload/save/skeleton

Added Files:
	code.php description.xml 
Log Message:
try to make skeleton plugin

--- NEW FILE: description.xml ---
<!DOCTYPE rkplugin>
<document>
  <entry type="entry" id="skeleton" label="Save package" />
<!-- The layout-section takes care of the layout of the GUI for this plugin. -->  <dialog>
    <tabbook>
      <tab label="Select variables" >
        <column>
          <row>
            <varselector id="vars" label="Select a variable" />
            <varslot multi="true" classes="all" source="vars" id="data" label="Objects" required="true" />
          </row>
        </column>
        <frame label="Options" >
          <row>
            <input size="small" initial="anRpackage" id="name" label="Name of the package" />
            <browser size="small" type="dir" id="path" initial="." label="Name of directory" />
            <checkbox value_unchecked="FALSE" checked="false" value="TRUE" id="force" label="Overwrite" />
          </row>
        </frame>
      </tab>
    </tabbook>
  </dialog>
</document>

--- NEW FILE: code.php ---
<?
	function preprocess () {
	}
	
	function calculate () {
$vars = str_replace ("\n", "','", trim (getRK_val ("data"))) ;
?>

package.skeleton(name =  "<? getRK("name") ; ?>", list = c('<? echo ($vars) ; ?>'),  path = "<? getRK("path") ; ?>", force =  "<? getRK("force") ; ?>")

<?
	}
	
	function printout () {
	// produce the output
?>

<?
	}
	
	function cleanup () {
?>


<?
	}
?>