forum.module 25.8 KB
Newer Older
Dries Buytaert's avatar
   
Dries Buytaert committed
1
2
3
4
<?php
// $Id$

function forum_node($field) {
Dries Buytaert's avatar
   
Dries Buytaert committed
5
  $info["name"] = t("forum topic");
Dries Buytaert's avatar
   
Dries Buytaert committed
6
7
8
9
10
11
12
13
14
  $info["description"] = t("A forum is a threaded discussion, enabling users to communicate about a particular topic.");

  return $info[$field];
}

function forum_access($op, $node) {
  if ($op == "view") {
    return $node->status;
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
15
  if ($op == "create") {
Dries Buytaert's avatar
   
Dries Buytaert committed
16
    return user_access("create forum topics");
Dries Buytaert's avatar
   
Dries Buytaert committed
17
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
18
19
}

Dries Buytaert's avatar
   
Dries Buytaert committed
20
function forum_perm() {
Dries Buytaert's avatar
   
Dries Buytaert committed
21
  return array("create forum topics");
Dries Buytaert's avatar
   
Dries Buytaert committed
22
}
Dries Buytaert's avatar
   
Dries Buytaert committed
23

24
function forum_settings() {
Dries Buytaert's avatar
   
Dries Buytaert committed
25

Dries Buytaert's avatar
   
Dries Buytaert committed
26
  if (module_exist("taxonomy")) {
Dries Buytaert's avatar
   
Dries Buytaert committed
27
    $vocs[0] = "<". t("none") .">";
Dries Buytaert's avatar
   
Dries Buytaert committed
28
29
30
31
    foreach (taxonomy_get_vocabularies("forum") as $vid => $voc) {
      $vocs[$vid] = $voc->name;
    }

Dries Buytaert's avatar
   
Dries Buytaert committed
32
    if ($voc) {
33
34
      $output .= form_textarea(t("Explanation or submission guidelines"), "forum_help", variable_get("forum_help", ""), 70, 5, t("This text will be displayed at the top of the forum submission form.  Useful for helping or instructing your users."));
      $output .= form_select(t("Forum vocabulary"), "forum_nav_vocabulary", variable_get("forum_nav_vocabulary", ""), $vocs, t("The taxonomy vocabulary that will be used as the navigation tree."));
Dries Buytaert's avatar
   
Dries Buytaert committed
35
      $output .= _taxonomy_term_select(t("Containers"), "forum_containers", variable_get("forum_containers", array()), variable_get("forum_nav_vocabulary", ""), t("You can choose forums which will not have topics, but will be just containers for other forums."), 1, t("<none>"));
Dries Buytaert's avatar
   
Dries Buytaert committed
36
      $output .= form_textfield(t("Forum icon path"), "forum_icon_path", variable_get("forum_icon_path", ""), 30, 255, t("The path to the forum icons.  Leave blank to disable icons.  Don't add a trailing slash.  Default icons are available in the 'misc' directory."));
Dries Buytaert's avatar
   
Dries Buytaert committed
37
      $number = array(5 => 5, 10 => 10, 15 => 15, 20 => 20, 25 => 25, 30 => 30, 35 => 35, 40 => 40, 50 => 50, 60 => 60, 80 => 80, 100 => 100, 10000 => 10000);
38
      $output .= form_select(t("Hot topic threshold"), "forum_hot_topic", variable_get("forum_hot_topic", 15), $number, t("The number of posts a topic must have to be considered <b>hot</b>."));
Dries Buytaert's avatar
   
Dries Buytaert committed
39
      $number = array(10 => 10, 25 => 25, 50 => 50, 75 => 75, 100 => 100);
40
41
      $output .= form_select(t("Topics per page"), "forum_per_page", variable_get("forum_per_page", 25), $number, t("The default number of topics displayed per page; links to browse older messages are automatically being displayed."));
      $forder = array(1 => t("Date - newest first"), 2 => t("Date - oldest first"), 3 => t("Posts - most active first"), 4=> t("Posts - least active first"));
Dries Buytaert's avatar
   
Dries Buytaert committed
42
      $output .= form_radios(t("Default order"), "forum_order", variable_get("forum_order", 1), $forder, t("The default display order for topics."));
43
      $output .= form_textfield(t("Number of topics in block"), "forum_block_num", variable_get("forum_block_num", "5"), 5, 5, t("The number of topics in the <b>Forum topics</b>-block.  To enable the block, click ". l("here", "admin/block") ."."));
Dries Buytaert's avatar
   
Dries Buytaert committed
44
45
    }
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
46

Dries Buytaert's avatar
   
Dries Buytaert committed
47
48
49
  return $output;
}

Dries Buytaert's avatar
Dries Buytaert committed
50
51
function forum_taxonomy($op, $type, $object) {
  if ($type == "vocabulary" && ($op == "insert" || $op == "update")) {
Dries Buytaert's avatar
   
Dries Buytaert committed
52
    if (variable_get("forum_nav_vocabulary", "") == "" && in_array("forum", $object["nodes"])) {
Dries Buytaert's avatar
Dries Buytaert committed
53
54
55
56
57
58
      // since none is already set, silently set this vocabulary as the navigation vocabulary
      variable_set("forum_nav_vocabulary", $object["vid"]);
    }
  }
}

Dries Buytaert's avatar
   
Dries Buytaert committed
59
function forum_load($node) {
Dries Buytaert's avatar
   
Dries Buytaert committed
60
  $forum = db_fetch_object(db_query("SELECT * FROM {forum} WHERE nid = %d", $node->nid));
Dries Buytaert's avatar
   
Dries Buytaert committed
61
62
63
64

  return $forum;
}

65
66
67
68
69
70
function forum_block($op = "list", $delta = 0) {
  if ($op == "list") {
    $blocks[0]["info"] = t("Forum topics");
  }
  else {
    if (user_access("access content")) {
Dries Buytaert's avatar
   
Dries Buytaert committed
71
      $content = node_title_list(db_query_range("SELECT n.nid, n.title, GREATEST(n.created, MAX(c.timestamp)) AS sort FROM {node} n LEFT JOIN {comments} c ON n.nid = c.nid WHERE n.type = 'forum' AND n.status = 1 GROUP BY n.nid, n.title, n.created ORDER BY sort DESC", 0, variable_get("forum_block_num", "5")), t("Active forum topics:"));
Dries Buytaert's avatar
   
Dries Buytaert committed
72

Dries Buytaert's avatar
   
Dries Buytaert committed
73
      $content .= node_title_list(db_query_range("SELECT nid, title FROM {node} WHERE type = 'forum' ORDER BY nid DESC", 0, variable_get("forum_block_num", "5")), t("New forum topics:"));
Dries Buytaert's avatar
   
Dries Buytaert committed
74

Dries Buytaert's avatar
   
Dries Buytaert committed
75
      if ($content) {
Dries Buytaert's avatar
   
Dries Buytaert committed
76
        $content .= "<div class=\"more-link\">". l(t("more"), "forum", array("title" => t("Read the latest forum topics."))) ."</div>";
Dries Buytaert's avatar
   
Dries Buytaert committed
77
      }
Dries Buytaert's avatar
   
Dries Buytaert committed
78

79
      $blocks["subject"] = t("Forum topics");
Dries Buytaert's avatar
   
Dries Buytaert committed
80
      $blocks["content"] = $content;
Dries Buytaert's avatar
   
Dries Buytaert committed
81
82
    }
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
83

Dries Buytaert's avatar
   
Dries Buytaert committed
84
85
86
  return $blocks;
}

87
function forum_link($type, $node = 0, $main = 0) {
Dries Buytaert's avatar
Dries Buytaert committed
88
  global $user;
Dries Buytaert's avatar
   
Dries Buytaert committed
89

Dries Buytaert's avatar
   
Dries Buytaert committed
90
91
  $links = array();

Dries Buytaert's avatar
   
Dries Buytaert committed
92
  if ($type == "page" && user_access("access content")) {
Dries Buytaert's avatar
   
Dries Buytaert committed
93
    $links[] = l(t("forums"), "forum");
Dries Buytaert's avatar
   
Dries Buytaert committed
94
95
  }

Dries Buytaert's avatar
   
Dries Buytaert committed
96
97
98
99
100
101
102
  if ($type == "system") {
    if (user_access("create forum topics")) {
      menu("node/add/forum", t("forum topic"), "node_page");
    }
    if (user_access("access content")) {
      menu("forum", t("forums"), "forum_page", 0, 1);
    }
Dries Buytaert's avatar
   
Dries Buytaert committed
103
104
  }

105
  if (!$main && $type == "node" && $node->type == "forum") {
Dries Buytaert's avatar
   
Dries Buytaert committed
106
107
    // get previous and next topic

Dries Buytaert's avatar
Dries Buytaert committed
108
    $result = db_query("SELECT n.nid, n.title, GREATEST(n.created, MAX(c.timestamp)) AS date_sort, COUNT(c.nid) AS num_comments FROM {node} n INNER JOIN {forum} f ON n.nid = f.nid INNER JOIN {comments} c ON n.nid = c.nid WHERE n.nid = f.nid AND f.tid = %d AND n.status = 1 GROUP BY n.nid, n.title, n.created ORDER BY ". _forum_get_topic_order(isset($user->sortby) ? $user->sortby : variable_get("forum_order", 1)), $node->tid);
Dries Buytaert's avatar
   
Dries Buytaert committed
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125

    while ($topic = db_fetch_object($result)) {
      if ($stop == 1) {
        $next->nid = $topic->nid;
        $next->title = $topic->title;
        break;
      }
      if ($topic->nid == $node->nid) {
        $stop = 1;
      }
      else {
        $prev->nid = $topic->nid;
        $prev->title = $topic->title;
      }
    }

    if ($prev) {
Dries Buytaert's avatar
Dries Buytaert committed
126
      $links[] = l(t("previous forum topic"), "node/view/$prev->nid", array("title" => $prev->title));
Dries Buytaert's avatar
   
Dries Buytaert committed
127
128
129
    }

    if ($next) {
Dries Buytaert's avatar
Dries Buytaert committed
130
      $links[] = l(t("next forum topic"), "node/view/$next->nid", array("title" => $next->title));
Dries Buytaert's avatar
   
Dries Buytaert committed
131
    }
Dries Buytaert's avatar
   
Dries Buytaert committed
132
133
  }

Dries Buytaert's avatar
   
Dries Buytaert committed
134
  return $links;
Dries Buytaert's avatar
   
Dries Buytaert committed
135
136
}

Dries Buytaert's avatar
   
Dries Buytaert committed
137
138
139
140
141
142
function forum_content($node) {
  $node->teaser = check_output($node->teaser);
  $node->body = check_output($node->body);
  return $node;
}

Dries Buytaert's avatar
   
Dries Buytaert committed
143
function forum_view($node, $main = 0) {
Dries Buytaert's avatar
   
Dries Buytaert committed
144

Dries Buytaert's avatar
   
Dries Buytaert committed
145
146
147
148
149
150
151
  if ($main == 0) {
    $term_data = array_shift(taxonomy_node_get_terms($node->nid));
    if (!$term_data) {
      // we are previewing
      $term_data = taxonomy_get_term($node->taxonomy[0]);
    }
    $voc = taxonomy_get_vocabulary($term_data->vid);
Dries Buytaert's avatar
   
Dries Buytaert committed
152
153
154
155
156
    // Breadcrumb navigation
    $breadcrumb[] = l(t("Home"), NULL);
    $breadcrumb[] = l(t("Forums"), "forum");
    $breadcrumb[] = l($term_data->name, "forum/$term_data->tid");
    // print the breadcrumb
Dries Buytaert's avatar
   
Dries Buytaert committed
157
    print theme("breadcrumb", $breadcrumb);
158
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
159
160
161
  // prepair the node content
  $node = forum_content($node);
  // print the node
Dries Buytaert's avatar
   
Dries Buytaert committed
162
  print theme("node", $node, $main);
Dries Buytaert's avatar
   
Dries Buytaert committed
163
164
}

165
166
167
168
function forum_validate(&$node) {
  // Make sure all fields are set properly:
  $node->icon = $node->icon ? $node->icon : "";
  $node->shadow = $node->shadow ? $node->shadow : 0;
169
  $node->tid = $node->tid ? $node->tid : 0;
170
171
172
173
174
175
  // We use the validate hook to remember the old taxonomy terms:
  if ($node->tid) {
    $node->taxonomy = array_keys(taxonomy_node_get_terms($node->nid));
    if (!in_array($node->tid[0], $node->taxonomy)) {
      $node->taxonomy[] = $node->tid[0];
    }
Dries Buytaert's avatar
Dries Buytaert committed
176
177
178
  }
}

Dries Buytaert's avatar
   
Dries Buytaert committed
179
function forum_form(&$node, &$help, &$error) {
Dries Buytaert's avatar
Dries Buytaert committed
180
181
182
  if ($node->tid) {
    // editing
    $tid = $node->tid;
183
184
  }
  else {
Dries Buytaert's avatar
Dries Buytaert committed
185
186
    // new topic
    $tid = arg(3);
187
188
  }

Dries Buytaert's avatar
   
Dries Buytaert committed
189
190
191
  // outputs the compose guidelines
  $help = variable_get("forum_help", "");

Dries Buytaert's avatar
   
Dries Buytaert committed
192
  $output .= _taxonomy_term_select(t("Forum"), "tid", $tid, variable_get("forum_nav_vocabulary", ""), "", 0, "", variable_get("forum_containers", array()));
Dries Buytaert's avatar
Dries Buytaert committed
193
194
195
196
197

  if ($node->nid) {
    // if editing, give option to leave shadows
    $output .= form_checkbox(t("Leave shadow copy"), "shadow", 1, $node->shadow, t("If you move this topic, you can leave a link in the old forum to the new forum."));
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
198

199
  $output .= form_textarea(t("Body"), "body", $node->body, 60, 10);
Dries Buytaert's avatar
   
Dries Buytaert committed
200
201
202
203

  return $output;
}

Dries Buytaert's avatar
   
Dries Buytaert committed
204
function forum_insert($node) {
Dries Buytaert's avatar
   
Dries Buytaert committed
205
  db_query("INSERT INTO {forum} (nid, shadow, tid) VALUES (%d, %d, %d)", $node->nid, $node->shadow, $node->tid[0]);
Dries Buytaert's avatar
   
Dries Buytaert committed
206
207
208
}

function forum_update($node) {
Dries Buytaert's avatar
   
Dries Buytaert committed
209
  db_query("UPDATE {forum} SET shadow = %d, tid = %d WHERE nid = %d", $node->shadow, $node->tid[0], $node->nid);
Dries Buytaert's avatar
   
Dries Buytaert committed
210
211
212
}

function forum_delete(&$node) {
Dries Buytaert's avatar
   
Dries Buytaert committed
213
  db_query("DELETE FROM {forum} WHERE nid = %d", $node->nid);
Dries Buytaert's avatar
   
Dries Buytaert committed
214
}
Dries Buytaert's avatar
   
Dries Buytaert committed
215

Dries Buytaert's avatar
   
Dries Buytaert committed
216
function _forum_num_comments($nid) {
Dries Buytaert's avatar
   
Dries Buytaert committed
217
  $value = db_fetch_object(db_query("SELECT COUNT(cid) AS count FROM {comments} WHERE nid = %d AND status = 0", $nid));
Dries Buytaert's avatar
   
Dries Buytaert committed
218
219
220
  return ($value) ? $value->count : 0;
}

Dries Buytaert's avatar
   
Dries Buytaert committed
221
function _forum_last_comment($nid) {
Dries Buytaert's avatar
   
Dries Buytaert committed
222
  $value = db_fetch_object(db_query_range("SELECT timestamp FROM {comments} WHERE nid = %d AND status = 0 ORDER BY timestamp DESC", $nid, 0, 1));
Dries Buytaert's avatar
   
Dries Buytaert committed
223
224
225
  return ($value) ? format_date($value->timestamp, "small") : "&nbsp;";
}

Dries Buytaert's avatar
   
Dries Buytaert committed
226
function _forum_last_reply($nid) {
Dries Buytaert's avatar
   
Dries Buytaert committed
227
  $value = db_fetch_object(db_query_range("SELECT c.timestamp, u.name, u.uid FROM {comments} c INNER JOIN {users} u ON c.uid = u.uid WHERE c.nid = %d AND c.status = 0 ORDER BY c.timestamp DESC", $nid, 0, 1));
Dries Buytaert's avatar
   
Dries Buytaert committed
228
229
230
231
232
  return $value;
}

function _forum_format($topic) {
  if ($topic) {
Dries Buytaert's avatar
   
Dries Buytaert committed
233
    return t("%date<br />by %author", array("%date" => format_date($topic->timestamp, "small"), "%author" => format_name($topic)));
Dries Buytaert's avatar
   
Dries Buytaert committed
234
235
236
237
238
239
240
241
242
243
244
245
246
  }
  else {
    return message_na();
  }
}

function forum_get_forums($tid = 0) {
  global $user;

  if (!$tid) {
    $tid = 0;
  }

Dries Buytaert's avatar
   
Dries Buytaert committed
247
  $cache = cache_get("forum:$tid");
Dries Buytaert's avatar
   
Dries Buytaert committed
248

Dries Buytaert's avatar
   
Dries Buytaert committed
249
  if (empty($cache)) {
250
    $forums = array();
Dries Buytaert's avatar
   
Dries Buytaert committed
251
    $_forums = taxonomy_get_tree(variable_get("forum_nav_vocabulary", ""), $tid);
Dries Buytaert's avatar
   
Dries Buytaert committed
252
253
    $n = 0;
    foreach ($_forums as $forum) {
Dries Buytaert's avatar
   
Dries Buytaert committed
254
255
256
      if (in_array($forum->tid, variable_get("forum_containers", array()))) {
        $forum->container = 1;
      }
Dries Buytaert's avatar
   
Dries Buytaert committed
257
258
259
      $forum->num_topics = _forum_num_topics($forum->tid);
      $forum->num_posts = _forum_num_replies($forum->tid) + $forum->num_topics;
      $forum->last_post = _forum_last_post($forum->tid);
Dries Buytaert's avatar
   
Dries Buytaert committed
260
261
262
263
      $forums[$forum->tid] = $forum;
      $n++;
    }

Dries Buytaert's avatar
   
Dries Buytaert committed
264
    cache_set("forum:$tid", serialize($forums), 1);
Dries Buytaert's avatar
   
Dries Buytaert committed
265
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
266
267
268
  else {
    $forums = unserialize($cache->data);
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288

  if ($user->uid && $forums) {
    foreach (_forum_topics_read($user->uid) as $tid => $old) {
      if ($forums[$tid]) {
        $forums[$tid]->old_topics = $old;
      }
    }
  }
  return $forums;
}

function forum_get_parents($tid) {
  if ($tid) {
    $parents[] = taxonomy_get_term($tid);
  }
  $n = 0;
  while ($parent = taxonomy_get_parents($parents[$n]->tid)) {
    $parents = array_merge($parents, $parent);
    $n++;
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
289

Dries Buytaert's avatar
   
Dries Buytaert committed
290
291
292
293
  return $parents;
}

function _forum_num_topics($term) {
Dries Buytaert's avatar
   
Dries Buytaert committed
294
  $value = db_fetch_object(db_query("SELECT COUNT(n.nid) AS count FROM {node} n INNER JOIN {forum} f ON n.nid = f.nid WHERE f.tid = %d AND n.nid = f.nid AND n.status = 1 AND n.type = 'forum'", $term));
Dries Buytaert's avatar
   
Dries Buytaert committed
295
296
297
298
  return ($value) ? $value->count : 0;
}

function _forum_num_replies($term) {
Dries Buytaert's avatar
   
Dries Buytaert committed
299
  $value = db_fetch_object(db_query("SELECT COUNT(*) AS count FROM {comments} c INNER JOIN {node} n ON n.nid = c.nid INNER JOIN {forum} f ON n.nid = f.nid WHERE f.tid = %d AND n.nid = f.nid AND n.nid = c.nid AND n.status = 1 AND c.status = 0 AND n.type = 'forum'", $term));
Dries Buytaert's avatar
   
Dries Buytaert committed
300
301
302
303
  return ($value) ? $value->count : 0;
}

function _forum_topics_read($uid) {
Dries Buytaert's avatar
   
Dries Buytaert committed
304
  $result = db_query("SELECT tid, count(*) AS c FROM {history} h INNER JOIN {node} n ON n.nid = h.nid INNER JOIN {forum} f ON n.nid = f.nid WHERE f.nid = n.nid AND n.nid = h.nid AND n.type = 'forum' AND n.status = 1 AND h.uid = %d GROUP BY tid", $uid);
Dries Buytaert's avatar
   
Dries Buytaert committed
305
306
307
308
309
310
311
312
313

  while ($obj = db_fetch_object($result)) {
    $topics_read[$obj->tid] = $obj->c;
  }

  return $topics_read ? $topics_read : array();
}

function _forum_last_post($term) {
Dries Buytaert's avatar
   
Dries Buytaert committed
314
  $topic = db_fetch_object(db_query_range("SELECT n.nid, n.created AS timestamp, u.name AS name, u.uid AS uid FROM {forum} f INNER JOIN {node} n ON n.nid = f.nid INNER JOIN {users} u ON n.uid = u.uid WHERE f.tid = %d AND n.nid = f.nid AND n.type = 'forum' AND n.status = 1 ORDER BY timestamp DESC", $term, 0, 1));
Dries Buytaert's avatar
   
Dries Buytaert committed
315

Dries Buytaert's avatar
   
Dries Buytaert committed
316
  $reply = db_fetch_object(db_query_range("SELECT n.nid, c.timestamp, u.name AS name, u.uid AS uid FROM {forum} f INNER JOIN {node} n ON n.nid = f.nid INNER JOIN {comments} c ON n.nid = c.nid INNER JOIN {users} u ON c.uid = u.uid WHERE f.tid = %d AND n.nid = f.nid AND n.type = 'forum' AND n.status = 1 AND c.status = 0 ORDER BY c.timestamp DESC", $term, 0, 1));
Dries Buytaert's avatar
   
Dries Buytaert committed
317
318
319
320
321
322

  $value = ($topic->timestamp > $reply->timestamp) ? $topic : $reply;

  return $value;
}

Dries Buytaert's avatar
Dries Buytaert committed
323
function forum_get_topics($tid, $sortby, $forum_per_page) {
Dries Buytaert's avatar
   
Dries Buytaert committed
324
  global $user, $forum_topic_list_header;
Dries Buytaert's avatar
   
Dries Buytaert committed
325

Dries Buytaert's avatar
   
Dries Buytaert committed
326
  $forum_topic_list_header = array(
327
328
      array("data" => "&nbsp;"),
      array("data" => t("Topic"), "field" => "n.title"),
Dries Buytaert's avatar
   
Dries Buytaert committed
329
      array("data" => t("Replies"), "field" => "num_comments"),
Dries Buytaert's avatar
   
Dries Buytaert committed
330
331
332
      array("data" => t("Created"), "field" => "n.created"),
      array("data" => t("Last reply"), "field" => "date_sort", "sort" => "desc"),
  );
Dries Buytaert's avatar
   
Dries Buytaert committed
333
334

  $sql_sortby = _forum_get_topic_order($sortby);
Dries Buytaert's avatar
   
Dries Buytaert committed
335
  for ($i = 0; $i < count($forum_topic_list_header); $i++) {
Dries Buytaert's avatar
   
Dries Buytaert committed
336
337
338
339
340
341
342
    if ($forum_topic_list_header[$i]["field"] == $sql_sortby) {
      $forum_topic_list_header[$i]["order"] = $sql_sortby;
    }
  }

  $term = taxonomy_get_term($tid);
  $voc = taxonomy_get_vocabulary($term->vid);
Dries Buytaert's avatar
Dries Buytaert committed
343
  $check_tid = $tid ? "'". check_query($tid). "'" : "NULL";
Dries Buytaert's avatar
   
Dries Buytaert committed
344

Dries Buytaert's avatar
Dries Buytaert committed
345
  // show topics with the correct tid, or in the forum but with shadow = 1
Dries Buytaert's avatar
   
Dries Buytaert committed
346
347
  // @TODO: this is not ANSI SQL! ("user error: 'n.created' isn't in GROUP BY")
  // @TODO: timestamp is a sql reserved word. are there more?
Dries Buytaert's avatar
Dries Buytaert committed
348
  $sql = "SELECT n.nid, n.title, u.name AS name, u.uid AS uid, n.created AS timestamp, GREATEST(n.created, MAX(c.timestamp)) AS date_sort, COUNT(c.nid) AS num_comments, n.comment AS comment_mode, f.tid FROM {node} n INNER JOIN {term_node} r ON n.nid = r.nid INNER JOIN {users} u ON n.uid = u.uid LEFT JOIN {comments} c ON n.nid = c.nid INNER JOIN {forum} f ON n.nid = f.nid WHERE n.nid = r.nid AND ((r.tid = $check_tid AND f.shadow = 1) OR f.tid = $check_tid) AND n.status = 1 AND n.type = 'forum' GROUP BY n.nid, n.title, u.name, u.uid, n.created, n.comment, f.tid";
Dries Buytaert's avatar
   
Dries Buytaert committed
349
  $sql .= tablesort_sql($forum_topic_list_header);
Dries Buytaert's avatar
Dries Buytaert committed
350

Dries Buytaert's avatar
Dries Buytaert committed
351
  $sql_count = "SELECT COUNT(DISTINCT(n.nid)) FROM {node} n INNER JOIN {forum} f ON n.nid = f.nid INNER JOIN {term_node} r ON n.nid = r.nid WHERE n.nid = r.nid AND ( (r.tid = $check_tid AND f.shadow = 1) OR f.tid = $check_tid) AND n.status = 1 AND n.type = 'forum'";
Dries Buytaert's avatar
   
Dries Buytaert committed
352

Dries Buytaert's avatar
Dries Buytaert committed
353
  $result = pager_query($sql, $forum_per_page, 0, $sql_count);
Dries Buytaert's avatar
   
Dries Buytaert committed
354
355
356
357
  $topic_num = db_num_rows($result);

  $n = 0;
  while ($topic = db_fetch_object($result)) {
Dries Buytaert's avatar
Dries Buytaert committed
358
359
360
361
362
    if ($user->uid) {
      $history = _forum_user_last_visit($topic->nid);
      // folder is new if topic is new or there are new comments since last visit
      if ($topic->shadow > 0) {
        $topic->new = 0;
Dries Buytaert's avatar
   
Dries Buytaert committed
363
364
      }
      else {
Dries Buytaert's avatar
Dries Buytaert committed
365
366
        if (!$history && $user->uid) {
          $topic->new_replies = 0;
Dries Buytaert's avatar
   
Dries Buytaert committed
367
368
369
          $topic->new = 1;
        }
        else {
Dries Buytaert's avatar
   
Dries Buytaert committed
370
          $comments = db_result(db_query("SELECT COUNT(c.nid) FROM {node} n INNER JOIN {comments} c ON n.nid = c.nid WHERE n.nid = '$topic->nid' AND n.status = 1 AND c.status = 0 AND timestamp > '$history' GROUP BY n.nid"));
Dries Buytaert's avatar
Dries Buytaert committed
371
372
373
374
375
376
377
378

          $topic->new_replies = $comments ? $comments : 0;
          if ($topic->new_replies) {
            $topic->new = 1;
          }
          else {
            $topic->new = 0;
          }
Dries Buytaert's avatar
   
Dries Buytaert committed
379
380
        }
      }
Dries Buytaert's avatar
Dries Buytaert committed
381
382
383
384
385
386
     }
     else {
      // you're not logged in eh?
      $topic->new_replies = 0;
      $topic->new = 0;
     }
Dries Buytaert's avatar
   
Dries Buytaert committed
387
388
389
390
391

    $topic->last_reply = _forum_last_reply($topic->nid);
    $topics[] = $topic;
  }

Dries Buytaert's avatar
Dries Buytaert committed
392
  return $topics;
Dries Buytaert's avatar
   
Dries Buytaert committed
393
394
}

Dries Buytaert's avatar
Dries Buytaert committed
395
function _forum_new($tid) {
Dries Buytaert's avatar
   
Dries Buytaert committed
396
  global $user;
Dries Buytaert's avatar
   
Dries Buytaert committed
397
  $result = db_query("SELECT n.nid FROM {node} n, {history} h, {forum} f WHERE n.type = 'forum' AND n.status = 1 AND h.nid = n.nid AND f.nid = h.nid AND f.tid = %d AND h.uid = %d", $tid, $user->uid);
Dries Buytaert's avatar
   
Dries Buytaert committed
398
399
400
401
  while ($r = db_fetch_object($result)) {
    $read[] = $r->nid;
  }

Dries Buytaert's avatar
   
Dries Buytaert committed
402
  $nid = db_result(db_query_range("SELECT n.nid FROM {node} n INNER JOIN {forum} f ON n.nid = f.nid WHERE n.type = 'forum' AND f.nid = n.nid AND n.status = 1 AND f.tid = %d ". ($read ? "AND NOT (n.nid IN (". implode(",", $read) .")) " : "") ."ORDER BY created", $tid, 0, 1));
Dries Buytaert's avatar
   
Dries Buytaert committed
403
404
405
406

  return $nid ? $nid : 0;
}

Dries Buytaert's avatar
   
Dries Buytaert committed
407
function _forum_message_taxonomy() {
Dries Buytaert's avatar
   
Dries Buytaert committed
408
  return t("Forums are threaded discussions based on the taxonomy system.  For the forums to work, the taxonomy module has to be installed and enabled.  When activated, a taxonomy vocabulary (eg. \"forums\") needs to be %created and bound to the node type \"forum topic\".  The vocabulary's %terms define the forums.  If you define a term as a \"Container\", the term is not a forum itself, but rather holds forums.  This lets you group your forums.", array('%created' => l(t('created'), 'admin/taxonomy/add/vocabulary'), '%terms' => l(t('terms'), 'admin/taxonomy', array('title' => t('add terms')))));
Dries Buytaert's avatar
   
Dries Buytaert committed
409
410
}

Dries Buytaert's avatar
   
Dries Buytaert committed
411
function forum_page() {
Dries Buytaert's avatar
   
Dries Buytaert committed
412
  global $sortby, $forum_per_page, $from, $user;
Dries Buytaert's avatar
   
Dries Buytaert committed
413

Dries Buytaert's avatar
   
Dries Buytaert committed
414
  $op = $_POST["op"];
Dries Buytaert's avatar
   
Dries Buytaert committed
415

Dries Buytaert's avatar
   
Dries Buytaert committed
416
  if (user_access("access content")) {
Dries Buytaert's avatar
   
Dries Buytaert committed
417
    if (module_exist("taxonomy")) {
Dries Buytaert's avatar
   
Dries Buytaert committed
418
      $tid = arg(1);
Dries Buytaert's avatar
   
Dries Buytaert committed
419

Dries Buytaert's avatar
Dries Buytaert committed
420
421
422
423
424
      if (arg(2) == "new") {
        if ($nid = _forum_new($tid)) {
          drupal_goto(url("node/view/$nid"));
        }
      }
Dries Buytaert's avatar
   
Dries Buytaert committed
425

Dries Buytaert's avatar
   
Dries Buytaert committed
426
      if (empty($sortby)) {
Dries Buytaert's avatar
   
Dries Buytaert committed
427
        $sortby = isset($user->sortby) ? $user->sortby : variable_get("forum_order", 1);
Dries Buytaert's avatar
   
Dries Buytaert committed
428
      }
Dries Buytaert's avatar
   
Dries Buytaert committed
429

Dries Buytaert's avatar
   
Dries Buytaert committed
430
431
432
      if (empty($forum_per_page)) {
        $forum_per_page = isset($user->forum_per_page) ? $user->forum_per_page : variable_get("forum_per_page", 25);
      }
Dries Buytaert's avatar
   
Dries Buytaert committed
433

Dries Buytaert's avatar
Dries Buytaert committed
434
      $offset = ($from / $forum_per_page) + 1;
Dries Buytaert's avatar
   
Dries Buytaert committed
435

Dries Buytaert's avatar
   
Dries Buytaert committed
436
437
      $forums = forum_get_forums($tid);
      $parents = forum_get_parents($tid);
Dries Buytaert's avatar
   
Dries Buytaert committed
438
439
440
      if ($tid && !in_array($tid, variable_get("forum_containers", array()))) {
        $topics = forum_get_topics($tid, $sortby, $forum_per_page);
      }
Dries Buytaert's avatar
   
Dries Buytaert committed
441

Dries Buytaert's avatar
   
Dries Buytaert committed
442
      print theme("forum_display", $forums, $topics, $parents, $tid, $sortby, $forum_per_page, $offset);
Dries Buytaert's avatar
   
Dries Buytaert committed
443
444
    }
    else {
Dries Buytaert's avatar
   
Dries Buytaert committed
445
446
447
      drupal_set_title(t("Warning"));
      print theme("header");
      print _forum_message_taxonomy();
Dries Buytaert's avatar
   
Dries Buytaert committed
448
      print theme("footer");
Dries Buytaert's avatar
   
Dries Buytaert committed
449
    }
Dries Buytaert's avatar
   
Dries Buytaert committed
450
451
  }
  else {
Dries Buytaert's avatar
   
Dries Buytaert committed
452
453
454
    drupal_set_title(t("Access denied"));
    print theme("header");
    print message_access();
Dries Buytaert's avatar
   
Dries Buytaert committed
455
    print theme("footer");
Dries Buytaert's avatar
   
Dries Buytaert committed
456
457
458
  }
}

Dries Buytaert's avatar
   
Dries Buytaert committed
459
460
/**
  @addtogroup theme_system
Dries Buytaert's avatar
   
Dries Buytaert committed
461

Dries Buytaert's avatar
   
Dries Buytaert committed
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
  Forum module specific theme functions.
  @{
**/

/**
 Controls the output of the forum body.

 @param forums
 @param topics
 @param parents
 @param tid
 @param sortby
 @param forum_per_page
 @param offset

 @return string the output for the forum body.
**/
function theme_forum_display($forums, $topics, $parents, $tid, $sortby, $forum_per_page, $offset) {
Dries Buytaert's avatar
   
Dries Buytaert committed
480
  // forum list, topics list, topic browser and "add new topic" link
Dries Buytaert's avatar
   
Dries Buytaert committed
481

Dries Buytaert's avatar
   
Dries Buytaert committed
482
  $title = t("Forums");
Dries Buytaert's avatar
   
Dries Buytaert committed
483

Dries Buytaert's avatar
   
Dries Buytaert committed
484
485
486
  /*
  ** Breadcrumb navigation:
  */
Dries Buytaert's avatar
   
Dries Buytaert committed
487
  $breadcrumb[] = l(t("Home"), "");
Dries Buytaert's avatar
   
Dries Buytaert committed
488
  $breadcrumb[] = l($title, "forum");
Dries Buytaert's avatar
   
Dries Buytaert committed
489
490

  if ($parents) {
Dries Buytaert's avatar
   
Dries Buytaert committed
491
492
    $parents = array_reverse($parents);
    foreach ($parents as $p) {
493
494
      if ($p->tid == $tid) {
        $title = $p->name;
Dries Buytaert's avatar
   
Dries Buytaert committed
495
496
      }
      else {
Dries Buytaert's avatar
   
Dries Buytaert committed
497
        $breadcrumb[] = l($p->name, "forum/$p->tid");
Dries Buytaert's avatar
   
Dries Buytaert committed
498
499
500
501
      }
    }
  }

Dries Buytaert's avatar
   
Dries Buytaert committed
502
503
  if (count($forums) || count($parents)) {
    $output  = "<div id=\"forum\">";
Dries Buytaert's avatar
   
Dries Buytaert committed
504
    $output .= theme("forum_list", $forums, $parents, $tid);
Dries Buytaert's avatar
   
Dries Buytaert committed
505

Dries Buytaert's avatar
   
Dries Buytaert committed
506
    if ($tid && !in_array($tid, variable_get("forum_containers", array()))) {
Dries Buytaert's avatar
   
Dries Buytaert committed
507
      $output .= theme("forum_topic_list", $tid, $topics, $sortby, $forum_per_page, $offset);
Dries Buytaert's avatar
   
Dries Buytaert committed
508
509
510
511
512
513
    }
    $output .= "</div>";
  }
  else {
    $title = t("No forums defined");
    $output = '';
Dries Buytaert's avatar
   
Dries Buytaert committed
514
515
  }

Dries Buytaert's avatar
   
Dries Buytaert committed
516
517
518
519
  drupal_set_title($title);
  drupal_set_breadcrumb($breadcrumb);
  print theme("header");
  print $output;
Dries Buytaert's avatar
   
Dries Buytaert committed
520
  print theme("footer");
Dries Buytaert's avatar
   
Dries Buytaert committed
521
522
}

Dries Buytaert's avatar
   
Dries Buytaert committed
523
524
525
526
527
528
529
530
531
532
/**
 Outputs the forum listing.

 @param forums
 @param parents
 @param tid

 @return string the output for the forum listing.
**/
function theme_forum_list($forums, $parents, $tid) {
Dries Buytaert's avatar
   
Dries Buytaert committed
533
534
  global $user;

Dries Buytaert's avatar
   
Dries Buytaert committed
535
536
  if ($forums) {

Dries Buytaert's avatar
   
Dries Buytaert committed
537
    $header = array(t("Forum"), t("Topics"), t("Posts"), t("Last post"));
Dries Buytaert's avatar
   
Dries Buytaert committed
538
539

    foreach ($forums as $forum) {
Dries Buytaert's avatar
   
Dries Buytaert committed
540
541
542
543
      if ($forum->container) {
        $forum->num_topics = "";
        $forum->num_posts = "";
        $forum->last_post = "";
544
      }
Dries Buytaert's avatar
   
Dries Buytaert committed
545
546
547
548
      else {
        if ($user->uid) {
          $new_topics = $forum->num_topics - $forum->old_topics;
        }
Dries Buytaert's avatar
   
Dries Buytaert committed
549

Dries Buytaert's avatar
   
Dries Buytaert committed
550
        $links = array();
Dries Buytaert's avatar
   
Dries Buytaert committed
551

Dries Buytaert's avatar
   
Dries Buytaert committed
552
553
554
        if ($forum->last_post) {
          $links[] = l(t("the most recent topic"), "node/view/". $forum->last_post->nid);
        }
Dries Buytaert's avatar
   
Dries Buytaert committed
555

Dries Buytaert's avatar
   
Dries Buytaert committed
556
557
558
        if ($new_topics) {
          $links[] = l(t("the first new topic"), "forum/$forum->tid/new");
        }
Dries Buytaert's avatar
   
Dries Buytaert committed
559
      }
Dries Buytaert's avatar
   
Dries Buytaert committed
560
561
562
563
564
565
566
567
568
569

      $description  = "<div class=\"forum\" style=\"margin-left: ". ($forum->depth * 30) ."px;\">\n";
      $description .= " <div class=\"name\">". l($forum->name, "forum/$forum->tid") ."</div>\n";

      if ($forum->description) {
        $description .= " <div class=\"description\">$forum->description</div>\n";
      }
      if ($links) {
        $description .= " <div class=\"navigation\">". t("Jump to: %links", array("%links" => implode(", ", $links))) .".</div>\n";
      }
Dries Buytaert's avatar
   
Dries Buytaert committed
570
      $description .= "</div>\n";
Dries Buytaert's avatar
   
Dries Buytaert committed
571
572
573
574
575

      $rows[] = array(
        array("data" => $description, "class" => "description"),
        array("data" => $forum->num_topics . ($new_topics ? "<br />(".t("%a new", array("%a" => $new_topics)).")" : ""), "class" => "topics"),
        array("data" => $forum->num_posts, "class" => "posts"),
Dries Buytaert's avatar
   
Dries Buytaert committed
576
577
        array("data" => ($forum->container ? "" : _forum_format($forum->last_post)), "class" => "last-reply")

Dries Buytaert's avatar
   
Dries Buytaert committed
578
579
       );

Dries Buytaert's avatar
   
Dries Buytaert committed
580
581
582
    }
  }

Dries Buytaert's avatar
   
Dries Buytaert committed
583
  return theme("table", $header, $rows);
Dries Buytaert's avatar
   
Dries Buytaert committed
584
585
}

Dries Buytaert's avatar
   
Dries Buytaert committed
586
587
588
589
590
591
592
593
/**
 Outputs the topic listing.

 @param tid
 @param topics
 @param sortby
 @param forum_per_page
 @param offset
Dries Buytaert's avatar
   
Dries Buytaert committed
594

Dries Buytaert's avatar
   
Dries Buytaert committed
595
596
597
 @return string the output for the topic list.
**/
function theme_forum_topic_list($tid, $topics, $sortby, $forum_per_page, $offset) {
Dries Buytaert's avatar
   
Dries Buytaert committed
598
  global $id, $status, $user, $pager_total, $forum_topic_list_header;
Dries Buytaert's avatar
   
Dries Buytaert committed
599
600

  if ($topics) {
Dries Buytaert's avatar
   
Dries Buytaert committed
601

Dries Buytaert's avatar
   
Dries Buytaert committed
602
603
    foreach ($topics as $topic) {
      // folder is new if topic is new or there are new comments since last visit
Dries Buytaert's avatar
Dries Buytaert committed
604
      if ($topic->tid != $tid) {
Dries Buytaert's avatar
   
Dries Buytaert committed
605
        $rows[] = array(
Dries Buytaert's avatar
   
Dries Buytaert committed
606
          array("data" => _forum_icon($topic->new, $topic->num_comments, $topic->comment_mode), "class" => "icon"),
Dries Buytaert's avatar
   
Dries Buytaert committed
607
          array("data" => $topic->title, "class" => "title"),
Dries Buytaert's avatar
   
Dries Buytaert committed
608
          array("data" => l(t("This topic has been moved"), "forum/$topic->tid"), "colspan" => "3")
Dries Buytaert's avatar
   
Dries Buytaert committed
609
        );
Dries Buytaert's avatar
   
Dries Buytaert committed
610
611
      }
      else {
Dries Buytaert's avatar
   
Dries Buytaert committed
612
        $rows[] = array(
Dries Buytaert's avatar
   
Dries Buytaert committed
613
          array("data" => _forum_icon($topic->new, $topic->num_comments, $topic->comment_mode), "class" => "icon"),
Dries Buytaert's avatar
   
Dries Buytaert committed
614
615
          array("data" => l($topic->title, "node/view/$topic->nid"), "class" => "topic"),
          array("data" => $topic->num_comments . ($topic->new_replies ? "<br />(".t("%a new", array("%a" => $topic->new_replies)).")" : ""), "class" => "replies"),
Dries Buytaert's avatar
   
Dries Buytaert committed
616
617
          array("data" => _forum_format($topic), "class" => "created"),
          array("data" => _forum_format($topic->last_reply), "class" => "last-reply")
Dries Buytaert's avatar
   
Dries Buytaert committed
618
        );
Dries Buytaert's avatar
   
Dries Buytaert committed
619
620
621
      }
    }

Dries Buytaert's avatar
   
Dries Buytaert committed
622
    if ($pager = pager_display(NULL, $forum_per_page, 0, "default", tablesort_pager())) {
Dries Buytaert's avatar
   
Dries Buytaert committed
623
      $rows[] = array(array("data" => $pager, "colspan" => "5", "class" => "pager"));
Dries Buytaert's avatar
   
Dries Buytaert committed
624
625
    }
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
626
627


Dries Buytaert's avatar
Dries Buytaert committed
628
  if (user_access("create forum topics")) {
Dries Buytaert's avatar
   
Dries Buytaert committed
629
    $output = l(t("create new forum topic"), "node/add/forum/$tid") ."<br /><br />";
Dries Buytaert's avatar
   
Dries Buytaert committed
630
631
  }

Dries Buytaert's avatar
   
Dries Buytaert committed
632
  $output .= theme("table", $forum_topic_list_header, $rows);
Dries Buytaert's avatar
   
Dries Buytaert committed
633

Dries Buytaert's avatar
   
Dries Buytaert committed
634
635
636
  return $output;
}

Dries Buytaert's avatar
   
Dries Buytaert committed
637
638
/**  @} End of addtogroup theme_system **/

Dries Buytaert's avatar
   
Dries Buytaert committed
639
function _forum_icon($new_posts, $num_posts = 0, $comment_mode = 0) {
Dries Buytaert's avatar
   
Dries Buytaert committed
640

Dries Buytaert's avatar
   
Dries Buytaert committed
641
  $base_path = variable_get("forum_icon_path", "");
Dries Buytaert's avatar
   
Dries Buytaert committed
642
643
  if ($base_path) {
    if ($num_posts > variable_get("forum_hot_topic", 15)) {
Dries Buytaert's avatar
   
Dries Buytaert committed
644
      $icon = $new_posts ? "hot-new" : "hot";
Dries Buytaert's avatar
   
Dries Buytaert committed
645
646
647
648
649
650
651
652
653
    }
    else {
      $icon = $new_posts ? "new" : "default";
    }

    if ($comment_mode == 1) {
      $icon = "closed";
    }

Dries Buytaert's avatar
   
Dries Buytaert committed
654
    // default
Dries Buytaert's avatar
   
Dries Buytaert committed
655
    $file = $base_path ."/forum-$icon.gif";
Dries Buytaert's avatar
   
Dries Buytaert committed
656

Dries Buytaert's avatar
   
Dries Buytaert committed
657
    return "<img src=\"$file\" alt=\"\" title=\"\" />";
Dries Buytaert's avatar
   
Dries Buytaert committed
658
659
660
661
662
663
664
665
666
667
  }
  else {
    return "&nbsp;";
  }
}

function _forum_user_last_visit($nid) {
  global $user;
  static $history;
  if (!$history) {
Dries Buytaert's avatar
   
Dries Buytaert committed
668
    $result = db_query("SELECT nid, timestamp FROM {history} WHERE uid = %d", $user->uid);
Dries Buytaert's avatar
   
Dries Buytaert committed
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
    while ($t = db_fetch_object($result)) {
      $history[$t->nid] = $t->timestamp;
    }
  }
  return $history[$nid] ? $history[$nid] : 0;
}

function _forum_get_topic_order($sortby) {
  switch ($sortby) {
    case 1:
      return "date_sort DESC";
      break;
    case 2:
      return "date_sort ASC";
      break;
    case 3:
      return "num_comments DESC";
      break;
    case 4:
      return "num_comments ASC";
      break;
  }
}

Dries Buytaert's avatar
   
Dries Buytaert committed
693
function forum_help($section = "admin/help#forum") {
Dries Buytaert's avatar
   
Dries Buytaert committed
694
695
696
  $output = "";

  switch ($section) {
Dries Buytaert's avatar
   
Dries Buytaert committed
697
    case 'admin/help#forum':
Dries Buytaert's avatar
   
Dries Buytaert committed
698
      $output .= "<h3>Creating a forum</h3>";
Dries Buytaert's avatar
   
Dries Buytaert committed
699
      $output .= "<p>The forum module uses taxonomy to organize itself. To create a forum you first have to create a %taxonomy. When doing this, choose a sensible name for it (such as \"fora\") and make sure under \"Types\" that \"forum\" is selected. Once you have done this, %taxo-terms to it. Each term will become a forum. If you fill in the description field, users will be given additonal information about the forum on the main forum page. For example: \"troubleshooting\" - \"Please ask your questions here.\"</p>";
Dries Buytaert's avatar
   
Dries Buytaert committed
700
      $output .= "<p>When you are happy with your vocabulary, go to %forums and set <b>Forum vocabulary</b> to the one you have just created. There will now be fora active on the site. For users to access them they must have the \"access content\" %permission and to create a topic they must have the \"create forum topics\" %permission. These permissions can be set in the %permission pages.</p>";
Dries Buytaert's avatar
   
Dries Buytaert committed
701
      $output .= "<h4>Icons</h4>";
Dries Buytaert's avatar
   
Dries Buytaert committed
702
      $output .= "<p>To disable icons, set the icon path as blank in %forums.</p>";
Dries Buytaert's avatar
   
Dries Buytaert committed
703
      $output .= "<p>All files in the icon directory are assumed to be images. You may use images of whatever size you wish, but it is recommended to use 15x15 or 16x16.</p>";
Dries Buytaert's avatar
   
Dries Buytaert committed
704
      $output = t($output, array("%taxonomy" => l(t("taxonomy vocabulary"), "admin/taxonomy/add/vocabulary"), "%taxo-terms" => l(t("add some terms"), "admin/taxonomy"), "%forums" => l(t("administer") ." &raquo; ". t("configutation") ." &raquo; ". t("modules") ." &raquo; ". t("forum"), "admin/system/modules/forum"), "%permission" => l(t("permission"), "admin/user/permission")));
Dries Buytaert's avatar
   
Dries Buytaert committed
705
      break;
Dries Buytaert's avatar
   
Dries Buytaert committed
706
    case 'admin/system/modules#description':
Dries Buytaert's avatar
   
Dries Buytaert committed
707
      $output = t("Enable threaded discussions about general topics.");
Dries Buytaert's avatar
   
Dries Buytaert committed
708
709
      break;
    case 'admin/system/modules/forum':
Dries Buytaert's avatar
   
Dries Buytaert committed
710
      $output = _forum_message_taxonomy();
Dries Buytaert's avatar
   
Dries Buytaert committed
711
712
      break;
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
713

Dries Buytaert's avatar
   
Dries Buytaert committed
714
  return $output;
Dries Buytaert's avatar
   
Dries Buytaert committed
715
716
717
}

?>