New feature implementation...

[Ralf Steinhaeusser]

First : where's Anthony ? His EMail-address seems to be invalid.

Now my problem:

I just tried to add a feature to your JediCodeFormat.

I'd like to have an option to insert begin-end blocks 5 (instead of 2) spaces.

Code like this

  case pt.ProcedureSection of
    psProcedureBody:
    begin
      Result := IndentProcedureBody(pt);
      xyz;
    end;

should afterwards look like this:

  case pt.ProcedureSection of
    psProcedureBody:
    begin
         Result := IndentProcedureBody(pt);
         xyz;
    end;

Somehow i didn't manage...

Can you help me with that, I guess it should be in TIndentProcedures.GetDesiredIndent.

[Ralf Steinhaeusser]

Hmm... stupid reformatter...
OK, once again:

Code like this

case_pt.ProcedureSection_of
__psProcedureBody:
__begin
____Result_:=_IndentProcedureBody(pt);
____xyz;
__end;

should afterwards look like this:

case_pt.ProcedureSection_of
__psProcedureBody:
__begin
_______Result_:=_IndentProcedureBody(pt);
_______xyz;
__end;