src/build_post.php


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27

<?php

function build_tag_pattern($tag) {
  return '/' . preg_quote($tag, '/') . '\\s*/';
}

function build_post_subject($listtag, $forumtag, $subject) {
  // strip the '[list]' and '[forum]' tags
  $tagpat = '/(' . preg_quote($listtag, '/') .
             '|' . preg_quote($forumtag, '/') . ')\\s*/';
  $subj = preg_replace($tagpat, '', $subject);

  // strip leading sequences of Re-equivalents
  if (preg_match('/^(?:(?:RE|AW|SV|VS)(?:\\[\\d+\\])?:\\s*)+/i', $subj, $m)) {
    $subj = substr($subj, strlen($m[0]));
  }

  // ensure nonempty subject
  $subj = trim($subj);
  if ($subj == '') {
    $subj = '(no subject)';
  }

  return $subj; 
}

?>