Re: Lazarus doesn't insert TAB charaters

[Graeme Geldenhuys]

On 5/31/06, Flávio Etrusco <[EMAIL PROTECTED]> wrote:

Disabling "Trim Trailing Spaces" should help you here.

Thanks Flávio.  Applying the small patch attached and then disabling
the "trim trailing spaces" and "Auto Indent" works just fine.


Regards,
 - Graeme -

Index: components/synedit/synedit.pp
===================================================================
--- components/synedit/synedit.pp	(revision 9381)
+++ components/synedit/synedit.pp	(working copy)
@@ -9621,8 +9621,8 @@
   {$IFDEF SYN_LAZARUS}
   // i now contains the needed spaces
   Spaces := CreateTabsAndSpaces(CaretX,i,TabWidth,
-                                not (eoTabsToSpaces in Options))+'|';
-  Spaces := StringOfChar(' ', i);
+                                not (eoTabsToSpaces in Options)); //+'|';
+//  Spaces := StringOfChar(' ', i);
   //debugln('TCustomSynEdit.DoTabKey Spaces="',DbgStr(Spaces),'" TabChar=',DbgStr(TabChar));
 
   BeginUndoBlock;