X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=web%2Fhtdocs%2Fchrome%2Fmenu.mc;h=623fb579826a66d125313cf9c14fabaf93680bc8;hb=4b15b6b8f210b1bd664e33c84c55a307fed4bf0c;hp=9747b54e77f33e0ad58370658da3a4f060b1a9dd;hpb=07bbb862227fad300104fd0ddd7cdb5ec26586bd;p=irspy-moved-to-github.git diff --git a/web/htdocs/chrome/menu.mc b/web/htdocs/chrome/menu.mc index 9747b54..623fb57 100644 --- a/web/htdocs/chrome/menu.mc +++ b/web/htdocs/chrome/menu.mc @@ -1,9 +1,9 @@ -%# $Id: menu.mc,v 1.14 2006-11-16 17:02:30 mike Exp $ +%# $Id: menu.mc,v 1.20 2006-12-04 16:47:27 mike Exp $

Home
Test all targets
Find a target
- Add a target
+ Add a target

Show targets @@ -13,7 +13,6 @@ % }

<%perl> -our $rec; my $id = $r->param("id"); { # Make up ID for newly created records. It would be more @@ -29,22 +28,19 @@ my $id = $r->param("id"); if ((!defined $id || $id eq "") && defined $host && defined $port && defined $dbname) { $id = "$host:$port/$dbname"; -# $r->param(id => $id); -# $ARGS{id} = $id; #warn "id set to '$id'"; } } -% if (!defined $id) { -% $rec = undef; -% } else { +% if (defined $id && $r->param("op") ne "copy") {
This Target +
Show details
- Edit details + ">Edit details
- ">Copy target + ">Copy target

">Quick Test