cui/source/dialogs/thesdlg.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  11  *   Licensed to the Apache Software Foundation (ASF) under one or more
  12  *   contributor license agreements. See the NOTICE file distributed
  13  *   with this work for additional information regarding copyright
  14  *   ownership. The ASF licenses this file to you under the Apache
  15  *   License, Version 2.0 (the "License"); you may not use this file
  16  *   except in compliance with the License. You may obtain a copy of
  17  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  18  */
  19
  20 #include "thesdlg.hxx"
  21 #include "thesdlg_impl.hxx"
  22 #include "cuires.hrc"
  23 #include "dialmgr.hxx"
  24
  25 #include <svl/lngmisc.hxx>
  26 #include <vcl/graphicfilter.hxx>
  27 #include <svtools/svlbitm.hxx>
  28 #include <svtools/treelistbox.hxx>
  29 #include "svtools/treelistentry.hxx"
  30 #include "svtools/viewdataentry.hxx"
  31 #include <vcl/wrkwin.hxx>
  32 #include <vcl/msgbox.hxx>
  33 #include <vcl/svapp.hxx>
  34 #include <vcl/builderfactory.hxx>
  35 #include <svx/dlgutil.hxx>
  36 #include <svx/dialmgr.hxx>
  37 #include <svx/svxerr.hxx>
  38 #include <editeng/unolingu.hxx>
  39 #include <svx/langbox.hxx>
  40 #include <svtools/langtab.hxx>
  41 #include <unotools/lingucfg.hxx>
  42 #include <i18nlangtag/mslangid.hxx>
  43 #include <comphelper/processfactory.hxx>
  44 #include <comphelper/string.hxx>
  45 #include <osl/file.hxx>
  46
  47 #include <stack>
  48 #include <algorithm>
  49
  50 #include <com/sun/star/linguistic2/XThesaurus.hpp>
  51 #include <com/sun/star/linguistic2/XMeaning.hpp>
  52 #include <com/sun/star/linguistic2/LinguServiceManager.hpp>
  53
  54 using namespace ::com::sun::star;
  55
  56 // class LookUpComboBox --------------------------------------------------
  57
  58 LookUpComboBox::LookUpComboBox(vcl::Window *pParent)
  59     : ComboBox(pParent, WB_LEFT|WB_DROPDOWN|WB_VCENTER|WB_3DLOOK|WB_TABSTOP)
  60     , m_pDialog(NULL)
  61 {
  62     EnableAutoSize(true);
  63
  64     m_aModifyIdle.SetIdleHdl( LINK( this, LookUpComboBox, ModifyTimer_Hdl ) );
  65     m_aModifyIdle.SetPriority( SchedulerPriority::LOWEST );
  66
  67     EnableAutocomplete( false );
  68 }
  69
  70 LookUpComboBox::~LookUpComboBox()
  71 {
  72     disposeOnce();
  73 }
  74
  75 void LookUpComboBox::dispose()
  76 {
  77     m_pDialog.clear();
  78     ComboBox::dispose();
  79 }
  80
  81 VCL_BUILDER_FACTORY(LookUpComboBox)
  82
  83 void LookUpComboBox::init(SvxThesaurusDialog *pDialog)
  84 {
  85     m_pDialog = pDialog;
  86 }
  87
  88 void LookUpComboBox::Modify()
  89 {
  90     m_aModifyIdle.Start();
  91 }
  92
  93 IMPL_LINK_NOARG_TYPED( LookUpComboBox, ModifyTimer_Hdl, Idle *, void )
  94 {
  95     m_pDialog->LookUp( GetText() );
  96     m_aModifyIdle.Stop();
  97 }
  98
  99 // class ReplaceEdit --------------------------------------------------
 100
 101 ReplaceEdit::ReplaceEdit(vcl::Window *pParent)
 102     : Edit(pParent, WB_BORDER | WB_TABSTOP)
 103     , m_pBtn(NULL)
 104 {
 105 }
 106
 107 ReplaceEdit::~ReplaceEdit()
 108 {
 109     disposeOnce();
 110 }
 111
 112 void ReplaceEdit::dispose()
 113 {
 114     m_pBtn.clear();
 115     Edit::dispose();
 116 }
 117
 118 VCL_BUILDER_FACTORY(ReplaceEdit)
 119
 120 void ReplaceEdit::Modify()
 121 {
 122     if (m_pBtn)
 123         m_pBtn->Enable( !GetText().isEmpty() );
 124 }
 125
 126 void ReplaceEdit::SetText( const OUString& rStr )
 127 {
 128     Edit::SetText( rStr );
 129     Modify();
 130 }
 131
 132 void ReplaceEdit::SetText( const OUString& rStr, const Selection& rNewSelection )
 133 {
 134     Edit::SetText( rStr, rNewSelection );
 135     Modify();
 136 }
 137
 138 // class ThesaurusAlternativesCtrl ----------------------------------
 139
 140 AlternativesString::AlternativesString(
 141     ThesaurusAlternativesCtrl &rControl,
 142     SvTreeListEntry* pEntry, sal_uInt16 nFlags, const OUString& rStr ) :
 143
 144     SvLBoxString( pEntry, nFlags, rStr ),
 145     m_rControlImpl( rControl )
 146 {
 147 }
 148
 149 void AlternativesString::Paint(const Point& rPos, SvTreeListBox& /*rDev*/, vcl::RenderContext& rRenderContext,
 150                                const SvViewDataEntry* /*pView*/, const SvTreeListEntry* pEntry)
 151 {
 152     AlternativesExtraData* pData = m_rControlImpl.GetExtraData(pEntry);
 153     Point aPos(rPos);
 154     rRenderContext.Push(PushFlags::FONT);
 155     if (pData && pData->IsHeader())
 156     {
 157         vcl::Font aFont(rRenderContext.GetFont());
 158         aFont.SetWeight(WEIGHT_BOLD);
 159         rRenderContext.SetFont(aFont);
 160         aPos.X() = 0;
 161     }
 162     else
 163         aPos.X() += 5;
 164     rRenderContext.DrawText(aPos, GetText());
 165     rRenderContext.Pop();
 166 }
 167
 168 ThesaurusAlternativesCtrl::ThesaurusAlternativesCtrl(vcl::Window* pParent)
 169     : SvxCheckListBox(pParent)
 170     , m_pDialog(NULL)
 171 {
 172     SetStyle( GetStyle() | WB_CLIPCHILDREN | WB_HSCROLL | WB_FORCE_MAKEVISIBLE );
 173     SetHighlightRange();
 174 }
 175
 176 VCL_BUILDER_FACTORY(ThesaurusAlternativesCtrl)
 177
 178 void ThesaurusAlternativesCtrl::init(SvxThesaurusDialog *pDialog)
 179 {
 180     m_pDialog = pDialog;
 181 }
 182
 183 ThesaurusAlternativesCtrl::~ThesaurusAlternativesCtrl()
 184 {
 185     disposeOnce();
 186 }
 187
 188 void ThesaurusAlternativesCtrl::dispose()
 189 {
 190     ClearExtraData();
 191     m_pDialog.clear();
 192     SvxCheckListBox::dispose();
 193 }
 194
 195 void ThesaurusAlternativesCtrl::ClearExtraData()
 196 {
 197     UserDataMap_t   aEmpty;
 198     m_aUserData.swap( aEmpty );
 199 }
 200
 201 void ThesaurusAlternativesCtrl::SetExtraData(
 202     const SvTreeListEntry *pEntry,
 203     const AlternativesExtraData &rData )
 204 {
 205     if (!pEntry)
 206         return;
 207
 208     UserDataMap_t::iterator aIt( m_aUserData.find( pEntry ) );
 209     if (aIt != m_aUserData.end())
 210         aIt->second = rData;
 211     else
 212         m_aUserData[ pEntry ] = rData;
 213 }
 214
 215 AlternativesExtraData * ThesaurusAlternativesCtrl::GetExtraData(
 216     const SvTreeListEntry *pEntry )
 217 {
 218     AlternativesExtraData *pRes = NULL;
 219     UserDataMap_t::iterator aIt( m_aUserData.find( pEntry ) );
 220     if (aIt != m_aUserData.end())
 221         pRes = &aIt->second;
 222     return pRes;
 223 }
 224
 225 SvTreeListEntry * ThesaurusAlternativesCtrl::AddEntry( sal_Int32 nVal, const OUString &rText, bool bIsHeader )
 226 {
 227     SvTreeListEntry* pEntry = new SvTreeListEntry;
 228     OUString aText;
 229     if (bIsHeader && nVal >= 0)
 230     {
 231         aText = OUString::number( nVal ) + ". ";
 232     }
 233     pEntry->AddItem( new SvLBoxString( pEntry, 0, OUString() ) ); // add empty column
 234     aText += rText;
 235     pEntry->AddItem( new SvLBoxContextBmp( pEntry, 0, Image(), Image(), false ) );  // otherwise crash
 236     pEntry->AddItem( new AlternativesString( *this, pEntry, 0, aText ) );
 237
 238     SetExtraData( pEntry, AlternativesExtraData( rText, bIsHeader ) );
 239     GetModel()->Insert( pEntry );
 240
 241     if (bIsHeader)
 242         GetViewDataEntry( pEntry )->SetSelectable( false );
 243
 244     return pEntry;
 245 }
 246
 247 void ThesaurusAlternativesCtrl::KeyInput( const KeyEvent& rKEvt )
 248 {
 249     const vcl::KeyCode& rKey = rKEvt.GetKeyCode();
 250
 251     if (rKey.GetCode() == KEY_RETURN || rKey.GetCode() == KEY_ESCAPE)
 252         GetParent()->KeyInput( rKEvt ); // parent will close dialog...
 253     else if (rKey.GetCode() == KEY_SPACE)
 254         m_pDialog->AlternativesDoubleClickHdl_Impl( this ); // look up current selected entry
 255     else if (GetEntryCount())
 256         SvxCheckListBox::KeyInput( rKEvt );
 257 }
 258
 259 void ThesaurusAlternativesCtrl::Paint(vcl::RenderContext& rRenderContext, const Rectangle& rRect)
 260 {
 261     if (!m_pDialog->WordFound())
 262     {
 263         Size aTextSize(rRenderContext.GetTextWidth(m_pDialog->getErrStr()), rRenderContext.GetTextHeight());
 264         aTextSize  = rRenderContext.LogicToPixel(aTextSize);
 265         Point aPos;
 266         aPos.X() += GetSizePixel().Width() / 2  - aTextSize.Width() / 2;
 267         aPos.Y() += GetSizePixel().Height() / 2;
 268         aPos = rRenderContext.PixelToLogic(aPos);
 269         rRenderContext.DrawText(aPos, m_pDialog->getErrStr());
 270     }
 271     else
 272         SvxCheckListBox::Paint(rRenderContext, rRect);
 273 }
 274
 275 uno::Sequence< uno::Reference< linguistic2::XMeaning > > SvxThesaurusDialog::queryMeanings_Impl(
 276         OUString& rTerm,
 277         const lang::Locale& rLocale,
 278         const beans::PropertyValues& rProperties )
 279     throw(lang::IllegalArgumentException, uno::RuntimeException)
 280 {
 281     uno::Sequence< uno::Reference< linguistic2::XMeaning > > aMeanings(
 282             xThesaurus->queryMeanings( rTerm, rLocale, rProperties ) );
 283
 284     // text with '.' at the end?
 285     if ( 0 == aMeanings.getLength() && rTerm.endsWith(".") )
 286     {
 287         // try again without trailing '.' chars. It may be a word at the
 288         // end of a sentence and not an abbreviation...
 289         OUString aTxt(comphelper::string::stripEnd(rTerm, '.'));
 290         aMeanings = xThesaurus->queryMeanings( aTxt, rLocale, rProperties );
 291         if (aMeanings.getLength())
 292         {
 293             rTerm = aTxt;
 294         }
 295     }
 296
 297     return aMeanings;
 298 }
 299
 300 bool SvxThesaurusDialog::UpdateAlternativesBox_Impl()
 301 {
 302     lang::Locale aLocale( LanguageTag::convertToLocale( nLookUpLanguage ) );
 303     uno::Sequence< uno::Reference< linguistic2::XMeaning > > aMeanings = queryMeanings_Impl(
 304             aLookUpText, aLocale, uno::Sequence< beans::PropertyValue >() );
 305     const sal_Int32 nMeanings = aMeanings.getLength();
 306     const uno::Reference< linguistic2::XMeaning > *pMeanings = aMeanings.getConstArray();
 307
 308     m_pAlternativesCT->SetUpdateMode( false );
 309
 310     // clear old user data of control before creating new ones via AddEntry below
 311     m_pAlternativesCT->ClearExtraData();
 312
 313     m_pAlternativesCT->Clear();
 314     for (sal_Int32 i = 0;  i < nMeanings;  ++i)
 315     {
 316         OUString rMeaningTxt = pMeanings[i]->getMeaning();
 317         uno::Sequence< OUString > aSynonyms( pMeanings[i]->querySynonyms() );
 318         const sal_Int32 nSynonyms = aSynonyms.getLength();
 319         const OUString *pSynonyms = aSynonyms.getConstArray();
 320         DBG_ASSERT( !rMeaningTxt.isEmpty(), "meaning with empty text" );
 321         DBG_ASSERT( nSynonyms > 0, "meaning without synonym" );
 322
 323         m_pAlternativesCT->AddEntry( i + 1, rMeaningTxt, true );
 324         for (sal_Int32 k = 0;  k < nSynonyms;  ++k)
 325             m_pAlternativesCT->AddEntry( -1, pSynonyms[k], false );
 326     }
 327
 328     m_pAlternativesCT->SetUpdateMode( true );
 329
 330     return nMeanings > 0;
 331 }
 332
 333 void SvxThesaurusDialog::LookUp( const OUString &rText )
 334 {
 335     if (OUString(rText) != m_pWordCB->GetText()) // avoid moving of the cursor if the text is the same
 336         m_pWordCB->SetText( rText );
 337     LookUp_Impl();
 338 }
 339
 340 IMPL_LINK( SvxThesaurusDialog, LeftBtnHdl_Impl, Button *, pBtn )
 341 {
 342     if (pBtn && aLookUpHistory.size() >= 2)
 343     {
 344         aLookUpHistory.pop();                       // remove current look up word from stack
 345         m_pWordCB->SetText( aLookUpHistory.top() );    // retrieve previous look up word
 346         aLookUpHistory.pop();
 347         LookUp_Impl();
 348     }
 349     return 0;
 350 }
 351
 352 IMPL_LINK( SvxThesaurusDialog, LanguageHdl_Impl, ListBox*, pLB )
 353 {
 354     OUString aLangText( pLB->GetSelectEntry() );
 355     LanguageType nLang = SvtLanguageTable::GetLanguageType( aLangText );
 356     DBG_ASSERT( nLang != LANGUAGE_NONE && nLang != LANGUAGE_DONTKNOW, "failed to get language" );
 357     if (xThesaurus->hasLocale( LanguageTag::convertToLocale( nLang ) ))
 358         nLookUpLanguage = nLang;
 359     SetWindowTitle( nLang );
 360     LookUp_Impl();
 361     return 0;
 362 }
 363
 364 void SvxThesaurusDialog::LookUp_Impl()
 365 {
 366     OUString aText( m_pWordCB->GetText() );
 367
 368     aLookUpText = OUString( aText );
 369     if (!aLookUpText.isEmpty() &&
 370             (aLookUpHistory.empty() || aLookUpText != aLookUpHistory.top()))
 371         aLookUpHistory.push( aLookUpText );
 372
 373     m_bWordFound = UpdateAlternativesBox_Impl();
 374     m_pAlternativesCT->Enable( m_bWordFound );
 375
 376     if ( m_pWordCB->GetEntryPos( aText ) == LISTBOX_ENTRY_NOTFOUND )
 377         m_pWordCB->InsertEntry( aText );
 378
 379     m_pReplaceEdit->SetText( OUString() );
 380     m_pLeftBtn->Enable( aLookUpHistory.size() > 1 );
 381 }
 382
 383 IMPL_LINK( SvxThesaurusDialog, WordSelectHdl_Impl, ComboBox *, pBox )
 384 {
 385     if (pBox && !m_pWordCB->IsTravelSelect())  // act only upon return key and not when traveling with cursor keys
 386     {
 387         sal_uInt16 nPos = pBox->GetSelectEntryPos();
 388         OUString aStr( pBox->GetEntry( nPos ) );
 389         aStr = linguistic::GetThesaurusReplaceText( aStr );
 390         m_pWordCB->SetText( aStr );
 391         LookUp_Impl();
 392     }
 393
 394     return 0;
 395 }
 396
 397 IMPL_LINK( SvxThesaurusDialog, AlternativesSelectHdl_Impl, SvxCheckListBox *, pBox )
 398 {
 399     SvTreeListEntry *pEntry = pBox ? pBox->GetCurEntry() : NULL;
 400     if (pEntry)
 401     {
 402         AlternativesExtraData * pData = m_pAlternativesCT->GetExtraData( pEntry );
 403         OUString aStr;
 404         if (pData && !pData->IsHeader())
 405         {
 406             aStr = pData->GetText();
 407             aStr = linguistic::GetThesaurusReplaceText( aStr );
 408         }
 409         m_pReplaceEdit->SetText( aStr );
 410     }
 411     return 0;
 412 }
 413
 414 IMPL_LINK( SvxThesaurusDialog, AlternativesDoubleClickHdl_Impl, SvxCheckListBox *, pBox )
 415 {
 416     SvTreeListEntry *pEntry = pBox ? pBox->GetCurEntry() : NULL;
 417     if (pEntry)
 418     {
 419         AlternativesExtraData * pData = m_pAlternativesCT->GetExtraData( pEntry );
 420         OUString aStr;
 421         if (pData && !pData->IsHeader())
 422         {
 423             aStr = pData->GetText();
 424             aStr = linguistic::GetThesaurusReplaceText( aStr );
 425         }
 426
 427         m_pWordCB->SetText( aStr );
 428         if (!aStr.isEmpty())
 429             LookUp_Impl();
 430     }
 431
 432     //! workaround to set the selection since calling SelectEntryPos within
 433     //! the double click handler does not work
 434     Application::PostUserEvent( LINK( this, SvxThesaurusDialog, SelectFirstHdl_Impl ), pBox, true );
 435     return 0;
 436 }
 437
 438 IMPL_STATIC_LINK( SvxThesaurusDialog, SelectFirstHdl_Impl, SvxCheckListBox *, pBox )
 439 {
 440     if (pBox && pBox->GetEntryCount() >= 2)
 441         pBox->SelectEntryPos( 1 );  // pos 0 is a 'header' that is not selectable
 442     return 0;
 443 }
 444
 445 // class SvxThesaurusDialog ----------------------------------------------
 446
 447 SvxThesaurusDialog::SvxThesaurusDialog(
 448     vcl::Window* pParent,
 449     uno::Reference< linguistic2::XThesaurus >  xThes,
 450     const OUString &rWord,
 451     LanguageType nLanguage)
 452     : SvxStandardDialog(pParent, "ThesaurusDialog", "cui/ui/thesaurus.ui")
 453     , m_aErrStr(CUI_RESSTR(RID_SVXSTR_ERR_TEXTNOTFOUND))
 454     , xThesaurus(NULL)
 455     , aLookUpText()
 456     , nLookUpLanguage(LANGUAGE_NONE)
 457     , m_bWordFound(false)
 458 {
 459     get(m_pLeftBtn, "left");
 460
 461     get(m_pWordCB, "wordcb");
 462     m_pWordCB->init(this);
 463
 464     get(m_pAlternativesCT, "alternatives");
 465     m_pAlternativesCT->init(this);
 466
 467     get(m_pReplaceEdit, "replaceed");
 468     PushButton *pReplaceBtn = get<PushButton>("replace");
 469     m_pReplaceEdit->init(pReplaceBtn);
 470
 471     get(m_pLangLB, "langcb");
 472
 473     pReplaceBtn->SetClickHdl( LINK( this, SvxThesaurusDialog, ReplaceBtnHdl_Impl ) );
 474     m_pLeftBtn->SetClickHdl( LINK( this, SvxThesaurusDialog, LeftBtnHdl_Impl ) );
 475     m_pWordCB->SetSelectHdl( LINK( this, SvxThesaurusDialog, WordSelectHdl_Impl ) );
 476     m_pLangLB->SetSelectHdl( LINK( this, SvxThesaurusDialog, LanguageHdl_Impl ) );
 477     m_pAlternativesCT->SetSelectHdl( LINK( this, SvxThesaurusDialog, AlternativesSelectHdl_Impl ));
 478     m_pAlternativesCT->SetDoubleClickHdl( LINK( this, SvxThesaurusDialog, AlternativesDoubleClickHdl_Impl ));
 479
 480     xThesaurus = xThes;
 481     aLookUpText = OUString( rWord );
 482     nLookUpLanguage = nLanguage;
 483     if (!rWord.isEmpty())
 484         aLookUpHistory.push( rWord );
 485
 486     OUString aTmp( rWord );
 487     (void)linguistic::RemoveHyphens( aTmp );
 488     (void)linguistic::ReplaceControlChars( aTmp );
 489     m_pReplaceEdit->SetText( aTmp );
 490     m_pWordCB->InsertEntry( aTmp );
 491
 492     LookUp( aTmp );
 493     m_pAlternativesCT->GrabFocus();
 494     m_pLeftBtn->Enable( false );
 495
 496     // fill language menu button list
 497     uno::Sequence< lang::Locale > aLocales;
 498     if (xThesaurus.is())
 499         aLocales = xThesaurus->getLocales();
 500     const sal_Int32 nLocales = aLocales.getLength();
 501     const lang::Locale *pLocales = aLocales.getConstArray();
 502     m_pLangLB->Clear();
 503     std::vector< OUString > aLangVec;
 504     for (sal_Int32 i = 0;  i < nLocales; ++i)
 505     {
 506         const LanguageType nLang = LanguageTag::convertToLanguageType( pLocales[i] );
 507         DBG_ASSERT( nLang != LANGUAGE_NONE && nLang != LANGUAGE_DONTKNOW, "failed to get language" );
 508         aLangVec.push_back( SvtLanguageTable::GetLanguageString( nLang ) );
 509     }
 510     std::sort( aLangVec.begin(), aLangVec.end() );
 511     for (size_t i = 0;  i < aLangVec.size();  ++i)
 512         m_pLangLB->InsertEntry( aLangVec[i] );
 513
 514     std::vector< OUString >::iterator aI = std::find(aLangVec.begin(), aLangVec.end(),
 515             SvtLanguageTable::GetLanguageString(nLanguage));
 516     if (aI != aLangVec.end())
 517     {
 518         m_pLangLB->SelectEntry(*aI);
 519     }
 520
 521     SetWindowTitle(nLanguage);
 522
 523     // disable controls if service is missing
 524     if (!xThesaurus.is())
 525         Enable( false );
 526 }
 527
 528 SvxThesaurusDialog::~SvxThesaurusDialog()
 529 {
 530     disposeOnce();
 531 }
 532
 533 void SvxThesaurusDialog::dispose()
 534 {
 535     m_pLeftBtn.clear();
 536     m_pWordCB.clear();
 537     m_pAlternativesCT.clear();
 538     m_pReplaceEdit.clear();
 539     m_pLangLB.clear();
 540     SvxStandardDialog::dispose();
 541 }
 542
 543 IMPL_LINK( SvxThesaurusDialog, ReplaceBtnHdl_Impl, Button *, /*pBtn*/ )
 544 {
 545     EndDialog(RET_OK);
 546     return 0;
 547 }
 548
 549 void SvxThesaurusDialog::SetWindowTitle( LanguageType nLanguage )
 550 {
 551     // adjust language
 552     OUString aStr( GetText() );
 553     sal_Int32 nIndex = aStr.indexOf( '(' );
 554     if( nIndex != -1 )
 555         aStr = aStr.copy( 0, nIndex - 1 );
 556     aStr += " (";
 557     aStr += SvtLanguageTable::GetLanguageString( nLanguage );
 558     aStr += ")";
 559     SetText( aStr );    // set window title
 560 }
 561
 562 OUString SvxThesaurusDialog::GetWord()
 563 {
 564     return m_pReplaceEdit->GetText();
 565 }
 566
 567
 568 void SvxThesaurusDialog::Apply()
 569 {
 570 }
 571
 572 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */