3 # creates a link given the parameters or returns "arch: N/A" or "arch: not fixed"
5 # if $stable = "none" then not fixed is sent
6 # if $stable = "" then not applicable is sent
8 <define-tag notneeded whitespace=delete>
20 [DA:Ikke nøj;dvendig:]
26 <define-tag notavailable whitespace=delete>
28 [TR:artIk bulunmuyor:]
38 [DA:ikke tilgængelig:]
39 [DA:Ikke tilgjengelig:]
44 <define-tag notapplicable whitespace=delete>
49 [HR:nije primjenjivo:]
62 <define-tag in1.3 whitespace=delete>
68 [FR:dans la version 1.3:]
73 [ES:en la versión 1.3:]
80 <define-tag in2.0 whitespace=delete>
86 [FR:dans la version 2.0:]
91 [ES:en la versión 2.0:]
98 <define-tag in2.1 whitespace=delete>
104 [FR:dans la version 2.1:]
109 [ES:en la versión 2.1:]
116 <define-tag in2.2 whitespace=delete>
122 [FR:dans la version 2.2:]
127 [ES:en la versión 2.2:]
135 # DO NOT translate anything below here. If you feel something needs to be changed, write to
140 my ( $release, $arch, $section, $package, $version ) = @_;
142 if ( $release eq "not" )
144 $str = "<DD><notneeded>";
146 elsif ( $release eq "bo" )
148 $str = "<DD>$arch - (<in1.3>) $version";
150 elsif ( $release eq "hamm" )
152 $str = "<DD>$arch - (<in2.0>) ";
153 if ( $version eq "not" )
155 $str .= "<notapplicable>";
157 elsif( $version eq "none" )
159 $str .= "<notavailable>";
163 if ( $section eq "" )
169 $str .= "<A HREF=\"/Packages/stable/$section/$package.html\">";
170 $str .= "$version</A>";
174 elsif ( $release eq "slink" )
176 $str = "<DD>$arch - (<in2.1>) ";
177 if ( $version eq "not" )
179 $str .= "<notapplicable>";
181 elsif( $version eq "none" )
183 $str .= "<notavailable>";
187 if ( $section eq "" )
189 $str .= "$package-$version";
193 $str .= "<A HREF=\"/Packages/frozen/$section/$package.html\">";
194 $str .= "$package-$version</A>";
198 elsif ( $release eq "potato" )
200 $str = "<DD>$arch - (<in2.2>) ";
201 if ( $version eq "not" )
203 $str .= "<notapplicable>";
205 elsif( $version eq "none" )
207 $str .= "<notavailable>";
211 if ( $section eq "" )
213 $str .= "$package-$version";
217 $str .= "<A HREF=\"/Packages/unstable/$section/$package.html\">";
218 $str .= "$package-$version</A>";