Ok -- I messed up the way the install manual matrix was i18n'd, so
I've fixed that.  Comments appreciated.  Rather than use slice in this
case (since it depends on the setting of arguments to a function), I
switch on $CUR_ISO_LANG.  Included is the diff.  Let me know if this
is more proper now.

--
.....Adam Di [EMAIL PROTECTED]<URL:http://www.onShore.com/>

Index: index.wml
===================================================================
RCS file: /cvs/webwml/webwml/english/releases/slink/index.wml,v
retrieving revision 1.24
diff -u -u -r1.24 index.wml
--- index.wml   1999/09/23 12:54:15     1.24
+++ index.wml   1999/09/26 18:14:40
@@ -11,9 +11,6 @@
 Otherwise, pick the exact architecture, language, and format you want
 from the table below.\n";
 
-# used to join "Install Manual _for_ i386", for instance
-$indirect_object_conjoiner = 'for';
-
  :>
 
 <ul>
=== Exit status: 1
=== cd 
/amnt/burrito-home/apharris/debian/www.debian.org/english/template/debian/
=== /usr/bin/cvs diff -u install_manual.wml

Index: install_manual.wml
===================================================================
RCS file: /cvs/webwml/webwml/english/template/debian/install_manual.wml,v
retrieving revision 1.1
diff -u -u -r1.1 install_manual.wml
--- install_manual.wml  1999/09/23 12:52:25     1.1
+++ install_manual.wml  1999/09/26 18:14:44
@@ -7,10 +7,17 @@
 sub permute_as_list {
     my($file, $name, @exts) = @_;
     my($ext, $arch);
-    $indirect_object_conjoiner or $indirect_object_conjoiner = 'for';
 
     foreach $arch (keys %arches) {
-        print "<li> <a href=\"./$arch/$file\">$name $indirect_object_conjoiner 
" . $arches{$arch} . "</a>";
+       print "<li> <a href=\"./$arch/$file\">";
+       # language dependant part -- given a manual name and an architecture, 
join them
+       if ( $CUR_ISO_LANG eq 'en' ) {
+           print "$name for " . $arches{$arch};
+       }
+       elsif ( $CUR_ISO_LANG eq 'de' ) {
+           print "$name für " . $arches{$arch};
+       }
+       print "</a>";
        if ( $#exts != -1 ) {
            foreach $ext (@exts) {
                print " (<a href=\"./$arch/$file.$ext\"><em>" . 

Reply via email to