]> git.lyx.org Git - lyx.git/blob - src/frontends/xforms/FormShowFile.C
Bugfixes: checkboxes to radiobuttons (from J�rgen S) and remove a little
[lyx.git] / src / frontends / xforms / FormShowFile.C
1 /* FormHelp.C
2  * (C) 2001 LyX Team
3  * \author Herbert Voss <voss@perce.de>
4  */
5
6 #include <config.h>
7
8 #ifdef __GNUG__
9 #pragma implementation
10 #endif
11
12 #include "xformsBC.h"
13 #include "ControlShowFile.h"
14 #include "FormShowFile.h"
15 #include "form_browser.h"
16 #include "gettext.h"
17
18 FormShowFile::FormShowFile(ControlShowFile & c)
19         : FormCB<ControlShowFile, FormBrowser>(c, string())
20 {}
21
22
23 void FormShowFile::update()
24 {
25         fl_hide_object(dialog_->button_update);
26         fl_clear_browser(dialog_->browser);
27         // courier medium
28         fl_set_browser_fontstyle(dialog_->browser,FL_FIXED_STYLE);
29         fl_set_form_title(dialog_->form, controller().getFileName().c_str());
30
31         string const contents = controller().getFileContents();
32         if (contents.empty())
33                 fl_add_browser_line(dialog_->browser,
34                                     "Error -> Cannot load file!");
35         else
36                 fl_add_browser_line(dialog_->browser, contents.c_str());
37 }