Fixes compilation

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1958 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2011-09-15 13:26:03 +00:00
parent b03c034c47
commit dfa22a28e5
1 changed files with 3 additions and 3 deletions
--- a/applications/fpbrowser/utf8_braille.pas
+++ b/applications/fpbrowser/utf8_braille.pas
@ -6,7 +6,7 @@
  Copyright 2011
 *)

-unit utf8_braille;
+unit mod_braille;

 interface

@ -186,9 +186,9 @@ var
  i: integer;
  output, aux_string: string;
  is_text: boolean;
-
+  page: string;
 begin
-
+  page := AInput;
  i := 1;
  output := '';
  aux_string := '';