diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2013-04-29 12:31:20 -0700 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2013-04-29 12:31:20 -0700 |
| commit | 22336a0eeba10b4d1a4a78801f83f7cef56a1a20 (patch) | |
| tree | 6d72adef0e02a6fbfbcba3969f2c24b6596d92e5 /httemplate/misc/delete-note.html | |
| parent | a0b714142b349a36eee41a5de1e511758a382ffb (diff) | |
| parent | 00755aee33cc3ecdf3634bcc0f50f54814bfc400 (diff) | |
Merge branch 'master' of git.freeside.biz:/home/git/freeside
Diffstat (limited to 'httemplate/misc/delete-note.html')
| -rw-r--r-- | httemplate/misc/delete-note.html | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/httemplate/misc/delete-note.html b/httemplate/misc/delete-note.html new file mode 100644 index 000000000..436326ff1 --- /dev/null +++ b/httemplate/misc/delete-note.html @@ -0,0 +1,11 @@ +<%init> +die "access denied" + unless $FS::CurrentUser::CurrentUser->access_right('Edit customer note'); + +my ($notenum) = $cgi->keywords; +$notenum =~ /^\d+$/ or die "bad notenum '$notenum'"; +my $note = FS::cust_main_note->by_key($notenum) + or die "notenum '$notenum' not found"; +$note->delete; +</%init> +<% $cgi->redirect($p.'view/cust_main.cgi?'.$note->custnum) %> |