]> git.ipfire.org Git - people/ms/ipfire-2.x.git/commitdiff
Add support for languages that read from right to left. trans-fa
authorMichael Tremer <michael.tremer@ipfire.org>
Tue, 11 Dec 2012 17:21:33 +0000 (18:21 +0100)
committerMichael Tremer <michael.tremer@ipfire.org>
Thu, 12 Dec 2013 20:11:06 +0000 (21:11 +0100)
config/cfgroot/lang.pl
html/html/themes/ipfire/include/functions.pl
html/html/themes/maniac/include/functions.pl

index 707b28d11e2b3c237c5c9cad072b20a705b50f34..7dbc4ec6c46ad2baa12ee25927b87bf123985e73 100644 (file)
@@ -157,4 +157,13 @@ sub BuildCacheLang {
     &General::log ("WARNING: cannot build cachelang file for [$missed].") if ($error);
     return $error;
 }
+
+sub RightToLeft() {
+       if ($language eq "fa") {
+               return 1;
+       }
+
+       return 0;
+}
+
 1;
index 2707593dbcd8e4a80c4dcf2e1f1881d1f45458da..e6af7f650ab9b46e73d6928a7f0f2757468f282f 100644 (file)
@@ -145,7 +145,17 @@ sub openpage {
     print <<END
 <?xml version='1.0' encoding='UTF-8'?>
 <!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0 Strict//EN' 'http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd'>
-<html xmlns='http://www.w3.org/1999/xhtml'>
+END
+;
+
+my $rtl = &Lang::RightToLeft();
+if ($rtl > 0) {
+       print "<html xmlns='http://www.w3.org/1999/xhtml' dir='rtl'>";
+} else {
+       print "<html xmlns='http://www.w3.org/1999/xhtml'>";
+}
+
+print <<END
 <head>
                <title>$title</title>
     $extrahead
index 0bb1d6e70d625dbb67b03ef2a3b0007d29ae51f6..414d7dce58cca51f4c46a7341c377d2db36d3e43 100644 (file)
@@ -145,7 +145,17 @@ sub openpage {
     print <<END
 <?xml version='1.0' encoding='UTF-8'?>
 <!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0 Strict//EN' 'http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd'>
-<html xmlns='http://www.w3.org/1999/xhtml'>
+END
+;
+
+my $rtl = &Lang::RightToLeft();
+if ($rtl > 0) {
+       print "<html xmlns='http://www.w3.org/1999/xhtml' dir='rtl'>";
+} else {
+       print "<html xmlns='http://www.w3.org/1999/xhtml'>";
+}
+
+print <<END
 <head>
                <title>$title</title>
     $extrahead