diff options
| author |  ppedrot <ppedrot@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2012-06-24 02:18:32 +0000 |
|---|---|---|
| committer | ppedrot <ppedrot@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2012-06-24 02:18:32 +0000 |
| commit | 505c7b0881d68670af24fd8fe0e3c28157b2c90d (patch) | |
| tree | 25b31068025e7f256be901418838ebe5177c5629 /ide/wg_MessageView.ml | |
| parent | 613bc22e120ff5c95eeed01836a5da4310e92998 (diff) | |
Cosmetic changes
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@15489 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'ide/wg_MessageView.ml')
| -rw-r--r-- | ide/wg_MessageView.ml | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/ide/wg_MessageView.ml b/ide/wg_MessageView.ml index b48afef58..cae6cf3c7 100644 --- a/ide/wg_MessageView.ml +++ b/ide/wg_MessageView.ml @@ -16,7 +16,10 @@ class type message_view = let message_view () : message_view = let buffer = GText.buffer ~tag_table:Tags.Message.table () in - let view = GText.view ~buffer ~editable:false ~wrap_mode:`WORD () in + let view = GText.view ~buffer + ~editable:false ~cursor_visible:false ~wrap_mode:`WORD () + in + let () = view#set_left_margin 2 in object inherit GObj.widget view#as_widget |