diff --git a/source/main.adb b/source/main.adb index 6a62014..8b7dfa4 100644 --- a/source/main.adb +++ b/source/main.adb @@ -202,7 +202,7 @@ begin cursor_mode := 0; - xxx := import_text ("./source/skill.ads"); + xxx := import_text ("./source/attribute.adb"); main_menu_loop: loop synchronize; @@ -211,7 +211,6 @@ begin -- --~main_menu; -- - --~ui.write (to_string (xxx.text), 0, 0, size => 11, code => true); ui.write_ada_code (xxx, 0, 0); end loop main_menu_loop; diff --git a/source/ui.adb b/source/ui.adb index 1016ada..57df443 100644 --- a/source/ui.adb +++ b/source/ui.adb @@ -647,7 +647,7 @@ package body ui is subset := 1; loop buffer := ada.strings.unbounded.element (text.text, length + subset); - exit when buffer = ' ' or buffer = '.' or buffer = '(' or buffer = ')' or buffer = ',' or buffer = ';' + exit when buffer = ' ' or buffer = '.' or buffer = '(' or buffer = ')' or buffer = ',' or buffer = ';' or buffer = ''' or buffer = character'val (9) or buffer = character'val (10); word := word & to_unbounded_string (buffer & ""); core.increment (subset); diff --git a/sprite/ui/monospace.png b/sprite/ui/monospace.png index ec8b1d1..6a3e9ea 100644 Binary files a/sprite/ui/monospace.png and b/sprite/ui/monospace.png differ