diff options
Diffstat (limited to 'library/goptions.ml')
-rw-r--r-- | library/goptions.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/library/goptions.ml b/library/goptions.ml index 64b08f6f4..dc5f994e3 100644 --- a/library/goptions.ml +++ b/library/goptions.ml @@ -340,7 +340,7 @@ let msg_sync_option_value (name,v) = | BoolValue false -> [< 'sTR "false" >] | IntValue n -> [< 'iNT n >] | StringValue s -> [< 'sTR s >] - | IdentValue id -> [< print_id id >] + | IdentValue id -> [< pr_id id >] let msg_async_option_value (name,vref) = match vref with |