Permalink
Browse files

Command-line path to font file

  • Loading branch information...
1 parent ce6292d commit 130db9376504a20162cc4236f46d3d370d2fa815 ermine committed with Apr 25, 2011
Showing with 1 addition and 1 deletion.
  1. +1 −1 captcha_stdout.ml
View
2 captcha_stdout.ml
@@ -180,7 +180,7 @@ let generate_image face string =
let _ =
let font = Sys.argv.(1)
- and string = Sys.argv.(2) in
+ and string = Sys.argv.(1) in
let ft_library = init () in
let face = new_face ft_library font 0 in
set_char_size face font_hor_size font_vert_size font_hres font_vres;

0 comments on commit 130db93

Please sign in to comment.