Skip to content

I
intranet-timesheet2
Commit 09a022b8 authored by Frank Bergmann's avatar Frank Bergmann
Browse files
Options

- Opus5: fixing link to tasks

parent a7ca5b0f
Hide whitespace changes
Inline Side-by-side
Showing with 2 additions and 1 deletion
www/hours/new.tcl
View file @ 09a022b8
...@@ -36,6 +36,7 @@ ad_page_contract { ...@@ -36,6 +36,7 @@ ad_page_contract {
# --------------------------------------------------------- # ---------------------------------------------------------
set user_id [ad_maybe_redirect_for_registration] set user_id [ad_maybe_redirect_for_registration]
if {"" == $return_url} { set return_url [im_url_with_query] }
set bgcolor(0) " class=roweven " set bgcolor(0) " class=roweven "
set bgcolor(1) " class=rowodd " set bgcolor(1) " class=rowodd "
if { [empty_string_p $julian_date] } { if { [empty_string_p $julian_date] } {
...@@ -278,7 +279,7 @@ db_foreach $statement_name $sql { ...@@ -278,7 +279,7 @@ db_foreach $statement_name $sql {
<td> <td>
<nobr> <nobr>
$indent$nbsps $indent$nbsps
<A href=/intranet-timesheet2-tasks/view?[export_url_vars task_id]> <A href=/intranet-timesheet2-tasks/new?[export_url_vars task_id project_id return_url]>
$task_name $task_name
</A> </A>
</nobr> </nobr>
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment