Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
I
intranet-forum
Project
Project
Details
Activity
Releases
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
0
Issues
0
List
Board
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
project-open
intranet-forum
Commits
e036c047
Commit
e036c047
authored
May 13, 2004
by
Frank Bergmann
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
updated all ad_parameter calls
parent
0bafb633
Changes
3
Hide whitespace changes
Inline
Side-by-side
Showing
3 changed files
with
5 additions
and
5 deletions
+5
-5
index.tcl
www/index.tcl
+1
-1
new-2.tcl
www/new-2.tcl
+1
-1
new-tind-2.tcl
www/new-tind-2.tcl
+3
-3
No files found.
www/index.tcl
View file @
e036c047
...
...
@@ -51,7 +51,7 @@ set return_url [im_url_with_query]
set
current_url
[
ns_conn url
]
if
{
[
empty_string_p
$forum
_how_many
]
||
$forum
_how_many < 1
}
{
set forum_how_many
[
ad_parameter
NumberResultsPerPage intranet 10
0
]
set forum_how_many
[
ad_parameter
-package_id
[
im_package_core_id
]
NumberResultsPerPage
""
5
0
]
}
set end_idx
[
expr
$forum
_start_idx +
$forum
_how_many - 1
]
...
...
www/new-2.tcl
View file @
e036c047
...
...
@@ -324,7 +324,7 @@ where topic_id=:topic_id"
# Alert about changes
# ---------------------------------------------------------------------
set
msg_url
"
[
ad_parameter -package_id
[
ad_acs_kernel_id
]
SystemURL
]
/intranet-forum/view?topic_id=
$topic
_id"
set
msg_url
"
[
ad_parameter -package_id
[
ad_acs_kernel_id
]
SystemURL
""
""
]
/intranet-forum/view?topic_id=
$topic
_id"
set
importance 0
db_1row subject_message
"
...
...
www/new-tind-2.tcl
View file @
e036c047
...
...
@@ -198,7 +198,7 @@ if {$asignee_id != $old_asignee_id} {
# Always send a mail to a new asignee
#
set msg_url
"
[
ad_parameter
SystemUrl
]
"
set msg_url
"
[
ad_parameter
-package_id
[
ad_acs_kernel_id
]
SystemUrl
""
""
]
"
append msg_url
"/intranet-forum/view?topic_id=
$topic
_id"
set topic_type
[
db_string topic_type
"select category from im_categories where category_id=:topic_type_id"
]
set msg_subject
"New
$topic
_type:
$subject
"
...
...
@@ -237,7 +237,7 @@ where m.topic_id=:topic_id
"
db_foreach update_stakeholders
$stakeholder
_sql
{
set msg_url
"
[
ad_parameter
SystemUrl
]
"
set msg_url
"
[
ad_parameter
-package_id
[
ad_acs_kernel_id
]
SystemUrl
""
""
]
"
append msg_url
"/intranet-forum/view?topic_id=
$topic
_id"
set topic_type
[
db_string topic_type
"select category from im_categories where category_id=:topic_type_id"
]
set msg_subject
"Closed
$topic
_type:
$subject
"
...
...
@@ -274,7 +274,7 @@ where m.topic_id=:topic_id
"
db_foreach update_stakeholders
$stakeholder
_sql
{
set msg_url
"
[
ad_parameter
SystemUrl
]
"
set msg_url
"
[
ad_parameter
-package_id
[
ad_acs_kernel_id
]
SystemUrl
""
""
]
"
append msg_url
"/intranet-forum/view?topic_id=
$topic
_id"
set topic_type
[
db_string topic_type
"select category from im_categories where category_id=:topic_type_id"
]
set msg_subject
"Accepted
$topic
_type:
$subject
"
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment