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
8b8bf1f2
Commit
8b8bf1f2
authored
Jan 31, 2006
by
Frank Bergmann
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
- some changes on forums (don't know anymore)
- Added parameters to timesheet2 to force logging of hours
parent
c2e5054c
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
8 additions
and
2 deletions
+8
-2
new-2.tcl
www/new-2.tcl
+4
-1
new.tcl
www/new.tcl
+4
-1
No files found.
www/new-2.tcl
View file @
8b8bf1f2
...
@@ -430,7 +430,7 @@ where
...
@@ -430,7 +430,7 @@ where
"
"
# Check for the root-parent message in order to determine
# Check for the root-parent message in order to determine
# wheth
t
er the user has subscribed to it or not.
# whether the user has subscribed to it or not.
set
ctr 0
set
ctr 0
while
{
""
!=
$parent
_id && 0 !=
$parent
_id &&
$ctr
< 10
}
{
while
{
""
!=
$parent
_id && 0 !=
$parent
_id &&
$ctr
< 10
}
{
ns_log Notice
"intranet-forum/new-2: looking up parent
$parent
_id of topic
$topic
_id"
ns_log Notice
"intranet-forum/new-2: looking up parent
$parent
_id of topic
$topic
_id"
...
@@ -535,10 +535,13 @@ where m.topic_id=:topic_id
...
@@ -535,10 +535,13 @@ where m.topic_id=:topic_id
db_foreach update_stakeholders
$stakeholder
_sql
{
db_foreach update_stakeholders
$stakeholder
_sql
{
ns_log Notice
"intranet-forum/new-2: Sending alerts: user_id=
$stakeholder
_id, importance=
$importance
, receive_updates=
$receive
_updates"
if
{
$importance
== 0
}
{
continue
}
if
{
$importance
== 0
}
{
continue
}
if
{[
string
compare
$receive
_updates
"none"
]}
{
continue
}
if
{[
string
compare
$receive
_updates
"none"
]}
{
continue
}
if
{
$importance
< 2 &&
[
string
compare
$receive
_updates
"major"
]}
{
continue
}
if
{
$importance
< 2 &&
[
string
compare
$receive
_updates
"major"
]}
{
continue
}
ns_log Notice
"intranet-forum/new-2: Sending out alert: '
$subject
'"
im_send_alert
$stakeholder
_id
"hourly"
$subject
"
$msg
_url
\n\n
$message
"
im_send_alert
$stakeholder
_id
"hourly"
$subject
"
$msg
_url
\n\n
$message
"
}
}
...
...
www/new.tcl
View file @
8b8bf1f2
...
@@ -329,7 +329,7 @@ if {$task_or_incident_p} {
...
@@ -329,7 +329,7 @@ if {$task_or_incident_p} {
<td>
<td>
<select name=priority>
<select name=priority>
<option value=1>1 -
[
_ intranet-forum.Emergency
]
</option>
<option value=1>1 -
[
_ intranet-forum.Emergency
]
</option>
<option value=2>2 -
Very Urgent#>
</option>
<option value=2>2 -
[
lang::message::lookup
""
intranet-forum.Very_Urgent
"Very Urgent"
]
</option>
<option value=3>3 -
[
_ intranet-forum.Urgent
]
</option>
<option value=3>3 -
[
_ intranet-forum.Urgent
]
</option>
<option value=4>4 -
[
_ intranet-forum.High_Normal
]
</option>
<option value=4>4 -
[
_ intranet-forum.High_Normal
]
</option>
<option value=5 selected>5 -
[
_ intranet-forum.Normal
]
</option>
<option value=5 selected>5 -
[
_ intranet-forum.Normal
]
</option>
...
@@ -429,6 +429,9 @@ incr ctr
...
@@ -429,6 +429,9 @@ incr ctr
# -------------- Scope -----------------------------
# -------------- Scope -----------------------------
# Default is "group", if the user can do it...
if
{[
im_permission
$user
_id add_topic_group
]}
{
set
scope
"group"
}
if
{
$topic
_type_id !=
[
im_topic_type_id_reply
]}
{
if
{
$topic
_type_id !=
[
im_topic_type_id_reply
]}
{
if
{
$object
_admin ||
$user
_id ==
$owner
_id
}
{
if
{
$object
_admin ||
$user
_id ==
$owner
_id
}
{
...
...
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