commit 6702bc37d4bc28ec45c6c25f6a953997f6999270
author Norbert Thiebaud <nthiebaud@gmail.com> Fri Oct 26 09:25:34 2012 +0200
committer Norbert Thiebaud <nthiebaud@gmail.com> Sat Nov 03 20:24:27 2012 -0500
tree f0f1ed58a15a494ae7c0e9706fcbfcb94024e6a0
parent 8ce4050497566182a0d9620e85cb28b5b13df67d

basic: convert StepPAD to OUString

Change-Id: I19d05f455767c973a47d0233b3af20af1ac3a20a

basic/source/runtime/step1.cxx

diff --git a/basic/source/runtime/step1.cxx b/basic/source/runtime/step1.cxx
index b5dbc33..483d912 100644
--- a/basic/source/runtime/step1.cxx
+++ b/basic/source/runtime/step1.cxx
@@ -144,15 +144,19 @@ void SbiRuntime::StepARGTYP( sal_uInt32 nOp1 )
void SbiRuntime::StepPAD( sal_uInt32 nOp1 )
{
    SbxVariable* p = GetTOS();
    String& s = (String&)(const String&) *p;
    if (s.Len() != nOp1)
    OUString s = p->GetOUString();
    sal_Int32 nLen(nOp1);
    if( s.getLength() != nLen )
    {
        rtl::OUStringBuffer aBuf(s);
        sal_Int32 nLen(nOp1);
        if (aBuf.getLength() > nLen)
        {
            comphelper::string::truncateToLength(aBuf, nLen);
        }
        else
        {
            comphelper::string::padToLength(aBuf, nLen, ' ');
        }
        s = aBuf.makeStringAndClear();
    }
}