From faa3f541a6f07894b3ea368dbab98217ed2db394 Mon Sep 17 00:00:00 2001
From: Daniel O'Connor <clockwerx@php.net>
Date: Wed, 25 Jan 2012 13:31:36 +0000
Subject: [PATCH] Request #13486 Set the worksheet direction to right-to-left
 (RTL)

git-svn-id: https://svn.php.net/repository/pear/packages/Spreadsheet_Excel_Writer/trunk@322730 c90b9560-bf6c-de11-be94-00142212c4b1
---
 Spreadsheet/Excel/Writer/Worksheet.php | 19 ++++++++++++++++++-
 1 file changed, 18 insertions(+), 1 deletion(-)

diff --git a/Spreadsheet/Excel/Writer/Worksheet.php b/Spreadsheet/Excel/Writer/Worksheet.php
index a03b1a6..d6b5ff0 100644
--- a/Spreadsheet/Excel/Writer/Worksheet.php
+++ b/Spreadsheet/Excel/Writer/Worksheet.php
@@ -277,6 +277,12 @@ class Spreadsheet_Excel_Writer_Worksheet extends Spreadsheet_Excel_Writer_BIFFwr
     */
     var $print_colmax;
 
+    /**
+    * Whether to display RightToLeft.
+    * @var integer
+    */
+    var $_Arabic;
+
     /**
     * Whether to use outline.
     * @var integer
@@ -468,6 +474,7 @@ class Spreadsheet_Excel_Writer_Worksheet extends Spreadsheet_Excel_Writer_BIFFwr
         $this->_outline_below     = 1;
         $this->_outline_right     = 1;
         $this->_outline_on        = 1;
+        $this->_Arabic            = 0;
 
         $this->_merged_ranges     = array();
 
@@ -1461,6 +1468,16 @@ class Spreadsheet_Excel_Writer_Worksheet extends Spreadsheet_Excel_Writer_BIFFwr
         }
      }
 
+    /**
+    * This method sets the worksheet direction to right-to-left (RTL)
+    *
+    * @param bool $rtl
+    */
+    function setRTL($rtl = true)
+    {
+        $this->_Arabic = ($rtl ? 1 : 0);
+     }
+
     /******************************************************************************
     *******************************************************************************
     *
@@ -2297,7 +2314,7 @@ class Spreadsheet_Excel_Writer_Worksheet extends Spreadsheet_Excel_Writer_BIFFwr
         $fFrozen        = $this->_frozen;        // 3
         $fDspZeros      = 1;                     // 4
         $fDefaultHdr    = 1;                     // 5
-        $fArabic        = 0;                     // 6
+        $fArabic        = $this->_Arabic;        // 6
         $fDspGuts       = $this->_outline_on;    // 7
         $fFrozenNoSplit = 0;                     // 0 - bit
         $fSelected      = $this->selected;       // 1