/usr/share/aegis/wish/chan_attr.rpt is in aegis-tk 4.24.3-3.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
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 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 | /*
* aegis - project change supervisor
* Copyright (C) 1999, 2002, 2006-2008 Peter Miller
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 3 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program. If not, see
* <http://www.gnu.org/licenses/>.
*/
columns({ width = 1000; });
auto ps;
ps = project[project_name()].state.branch;
auto cs;
cs = ps.change[change_number()];
auto paras, para_len, para_n;
paras = split(cs.brief_description, "\n");
para_len = count(paras);
if (para_len < 1)
para_len = 1;
while (para_len >= 2 && paras[para_len - 1] == "")
para_len = para_len - 1;
for (para_n = 0; para_n < para_len; para_n = para_n + 1)
{
auto para_begin, para_end;
para_begin = (para_n == 0 ? "set brief_description \"" : "");
para_end = (para_n == (para_len - 1) ? "\"" : "");
auto lines, line_len, line_n;
lines = wrap(quote_tcl(paras[para_n]), 75);
line_len = count(lines);
if (line_len < 1)
line_len = 1;
for (line_n = 0; line_n < line_len; line_n = line_n + 1)
{
auto line_begin, line_end;
line_begin = (line_n == 0 ? para_begin : "");
line_end = (line_n == (line_len - 1) ? para_end : "\\");
print(line_begin ## lines[line_n] ## line_end);
}
}
paras = split(cs.description, "\n");
para_len = count(paras);
if (para_len < 1)
para_len = 1;
while (para_len >= 2 && paras[para_len - 1] == "")
para_len = para_len - 1;
for (para_n = 0; para_n < para_len; para_n = para_n + 1)
{
para_begin = (para_n == 0 ? "set description \"" : "");
para_end = (para_n == (para_len - 1) ? "\"" : "");
lines = wrap(quote_tcl(paras[para_n]), 75);
line_len = count(lines);
if (line_len < 1)
line_len = 1;
for (line_n = 0; line_n < line_len; line_n = line_n + 1)
{
line_begin = (line_n == 0 ? para_begin : "");
line_end = (line_n == (line_len - 1) ? (para_end) : "\\");
print(line_begin ## lines[line_n] ## line_end);
}
}
print("set state " ## cs.state);
print("set cause " ## cs.cause);
print("set test_nor " ## (cs.test_exempt ? 0 : 1));
print("set test_bas " ## (cs.test_baseline_exempt ? 0 : 1));
print("set test_reg " ## (cs.regression_test_exempt ? 0 : 1));
|