eric
/
mysticbbs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

reformat paragraph (ctrl-B) now matches linewrap length in reguar word wrapping, pasting urls longer than 80 chars from clipboard now works as expected

This commit is contained in:
g00r00 2013-10-02 20:39:05 -04:00
parent fce718ece3
commit aa10b93c6a
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
mystic/bbs_edit_ansi.pas
View File

@ -191,7 +191,7 @@ Var
Begin
Result := False;
If GetLineLength(ANSI.Data[Line], 80) >= Rowsize Then Begin
If GetLineLength(ANSI.Data[Line], 80) >= RowSize Then Begin
Result := True;
Exit;
@ -1347,7 +1347,7 @@ Begin
If JoinLen = 0 Then Break;
If LineLen + JoinLen <= RowSize Then Begin
If LineLen + JoinLen < RowSize Then Begin
Move (ANSI.Data[Line + 1], ANSI.Data[Line][LineLen + 2], SizeOf(RecAnsiBufferChar) * JoinLen);
ANSI.Data[Line][LineLen + 1].Ch := ' ';
@ -1476,7 +1476,8 @@ Begin
End;
#32..
#254 : If (CurLength >= RowSize) and (GetWrapPos(ANSI.Data[CurLine], RowSize, RowSize) = 0) And InsertMode Then Begin
// dont do anything
DoEnter;
DoChar(Ch);
End Else
If (CurX = 1) and (Ch = '/') and (Not DrawMode) Then Begin
EditorCommands;