diff options
| -rw-r--r-- | src/adapad.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/adapad.adb b/src/adapad.adb index 2eee6bb..c9ff4e3 100644 --- a/src/adapad.adb +++ b/src/adapad.adb @@ -315,9 +315,9 @@ package body Adapad is (Item : in out FLTK.Widgets.Widget'Class) is begin if FLTK.Widgets.Menus.Menu (Item).Chosen.Value then - Editor.Set_Wrap_Mode (Windows.Editor.Wrap_At_Bounds); + Editor.Set_Wrap_Mode (Windows.Editor.Bounds); else - Editor.Set_Wrap_Mode (Windows.Editor.Wrap_None); + Editor.Set_Wrap_Mode (Windows.Editor.None); end if; end Wrap_CB; |