summaryrefslogtreecommitdiff
path: root/httemplate/edit/elements
diff options
context:
space:
mode:
authorivan <ivan>2009-09-18 19:28:59 +0000
committerivan <ivan>2009-09-18 19:28:59 +0000
commit20727883e43b7abed5160870b3fa3059a7cb1d83 (patch)
treeb7236337119f98eaa9adc0fee38a48778712ed6d /httemplate/edit/elements
parent3de7395677b966be0bc1d44bc0b912ebb58564ec (diff)
better error message when the clone object isn't found, RT#6128
Diffstat (limited to 'httemplate/edit/elements')
-rw-r--r--httemplate/edit/elements/edit.html3
1 files changed, 2 insertions, 1 deletions
diff --git a/httemplate/edit/elements/edit.html b/httemplate/edit/elements/edit.html
index e290bdb86..fd73e031e 100644
--- a/httemplate/edit/elements/edit.html
+++ b/httemplate/edit/elements/edit.html
@@ -745,7 +745,8 @@ if ( $cgi->param('error') ) {
$qsearch{'extra_sql'} = ' AND '. $opt{'agent_clone_extra_sql'}
if $opt{'agent_clone_extra_sql'};
- $object = qsearchs({ %qsearch, 'hashref' => { $pkey => $clone } });
+ $object = qsearchs({ %qsearch, 'hashref' => { $pkey => $clone } })
+ or die "$pkey $clone not found in $table";
&{$opt{'clone_callback'}}( $cgi, $object, $fields, \%opt )
if $opt{'clone_callback'};