#!/usr/local/bin/perl # edit_node.cgi # Edit a node in the haresources file require './heartbeat-lib.pl'; &ReadParse(); &foreign_require("init", "init-lib.pl"); if ($in{'new'}) { &ui_print_header(undef, $text{'node_create'}, ""); } else { &ui_print_header(undef, $text{'node_edit'}, ""); @res = &list_resources(); $res = $res[$in{'idx'}]; } print "
\n"; &ui_print_footer("edit_res.cgi", $text{'res_return'});