| |
129 |
129 |
<blockquote><pre>[ns_quotehtml $errmsg]</pre></blockquote>" |
| |
130 |
130 |
} |
| |
131 |
131 |
} |
| |
132 |
132 |
} on_error { |
| |
133 |
133 |
if {[db_string apm_package_add_doubleclick { |
| |
134 |
134 |
select decode(count(*), 0, 0, 1) from apm_package_versions |
| |
135 |
135 |
where version_id = :version_id |
| |
136 |
136 |
} -default 0]} { |
| |
137 |
137 |
ad_returnredirect "version-view?version_id=$version_id" |
| |
138 |
138 |
ad_script_abort |
| |
139 |
139 |
} |
| |
140 |
140 |
ad_return_error "Database Error" " |
| |
141 |
141 |
I was unable to create your package for the following reason: |
| |
142 |
142 |
|
| |
143 |
143 |
<blockquote><pre>[ns_quotehtml $errmsg]</pre></blockquote> |
| |
144 |
144 |
" |
| |
145 |
145 |
ad_script_abort |
| |
146 |
146 |
} |
| |
147 |
147 |
|
| |
148 |
148 |
ad_returnredirect "version-view?version_id=$version_id" |
| |
|
149 |
ad_script_abort |
| |
149 |
150 |
|
| |
150 |
151 |
# Local variables: |
| |
151 |
152 |
# mode: tcl |
| |
152 |
153 |
# tcl-indent-level: 4 |
| |
153 |
154 |
# indent-tabs-mode: nil |
| |
154 |
155 |
# End: |