1 #include <infodrom.style>
2 #include <debian.style>
3 #include <fileutils.pl>
6 <define-tag maxdevel>10</define-tag>
7 <define-tag maxreg>10</define-tag>
9 <page title="Debian Support - Channel #Debian.DE">
11 <table width=100% cellpadding=0 cellspacing=3 border=0>
13 <td width=80%><font face="Helvetica,Arial">
15 <h1 align=center>Channel #Debian.DE</h1>
17 <p>Aus alten Archiven von debian-user-de ging hervor, daß dieser
18 IRC-Kanal offenbar doch von mir (=Joey) <a
19 href="gruendung.html">gegründet</a> wurde. Ursprünglich lungerte ich
20 auf jeden Fall in #LinuxGER herum, doch der "Traffic" wurde zu groß,
21 um neben der normalen Arbeit hin und wieder in den Channel zu
22 schauen. Entweder bekam man nichts mit, weil man gearbeitet hat, oder
23 man kam nicht mehr zum Arbeiten, weil zuviel los war. Also ging ich
24 ins Exil und war per /msg erreichbar und ansonsten auf #debian.de.
28 <p>Im Prinzip gelten alle in der <a
29 href="http://www.linuxger.de/LinuxGER.html">#LinuxGER-HOWTO</a>
30 angesprochenen Regeln auch in diesem Channel. Weasel erstellt
31 zusätzlich noch eine <a
32 href="http://channel.debian.de/faq/">DebianDE-FAQ</a>. Bitte lies die
33 Howto und die FAQ, bevor Du im Channel Fragen stellst.
35 </font></td><td width=20%>
36 <: %data = parse_xmlfile ("channel.xml"); :>
37 <titlebox title=Developers><font size=-1>
42 $list = $data{'Developers'};
46 printf " \$contrib[] = \"%s\";\n", $entry{'Name'};
51 $max = <maxdevel> > count ($contrib) ? count ($contrib) : <maxdevel>;
53 if (count ($contrib) == 1) {
56 while (count ($ci) < $max) {
57 $r = rand (0, count ($contrib)-1);
59 # Filter out already selected items
61 for ($i=0; $i < count ($ci); $i++) {
62 if ($ci[$i] == $r) $new = 0;
69 for ($i=0; $i < count ($ci); $i++) {
70 printf (" %s<br>", $contrib[$ci[$i]]);
76 <titlebox title=Regulars><font size=-1>
81 $list = $data{'Regulars'};
85 printf " \$contrib[] = \"%s\";\n", $entry{'Name'};
90 $max = <maxdevel> > count ($contrib) ? count ($contrib) : <maxdevel>;
92 if (count ($contrib) == 1) {
95 while (count ($ci) < $max) {
96 $r = rand (0, count ($contrib)-1);
98 # Filter out already selected items
100 for ($i=0; $i < count ($ci); $i++) {
101 if ($ci[$i] == $r) $new = 0;
104 if ($new) $ci[] = $r;
108 for ($i=0; $i < count ($ci); $i++) {
109 printf (" %s<br>", $contrib[$ci[$i]]);
112 </font></titlebox><p>