|
Lines 17-22
Link Here
|
| 17 |
|
17 |
|
| 18 |
textdomain "ca-management"; |
18 |
textdomain "ca-management"; |
| 19 |
import "CaMgm"; |
19 |
import "CaMgm"; |
|
|
20 |
import "CommandLine"; |
| 20 |
import "Wizard"; |
21 |
import "Wizard"; |
| 21 |
import "Label"; |
22 |
import "Label"; |
| 22 |
import "Popup"; |
23 |
import "Popup"; |
|
Lines 28-33
Link Here
|
| 28 |
y2milestone ("----------------------------------------"); |
29 |
y2milestone ("----------------------------------------"); |
| 29 |
y2milestone ("common_cert module started"); |
30 |
y2milestone ("common_cert module started"); |
| 30 |
|
31 |
|
|
|
32 |
/** |
| 33 |
* Open main dialog sequence |
| 34 |
*/ |
| 35 |
define symbol MainSequence () { |
| 36 |
|
| 31 |
Wizard::CreateDialog(); |
37 |
Wizard::CreateDialog(); |
| 32 |
Wizard::SetDesktopIcon("ca-management"); |
38 |
Wizard::SetDesktopIcon("ca-management"); |
| 33 |
|
39 |
|
|
Lines 82-87
Link Here
|
| 82 |
} |
88 |
} |
| 83 |
until (contains ([`back, `next, `abort], ui)); |
89 |
until (contains ([`back, `next, `abort], ui)); |
| 84 |
Wizard::CloseDialog(); |
90 |
Wizard::CloseDialog(); |
|
|
91 |
} |
| 92 |
|
| 93 |
map cmdline = $[ |
| 94 |
"id" : "common_cert", |
| 95 |
"help" : _("Common Server Certificate"), |
| 96 |
"guihandler" : MainSequence, |
| 97 |
]; |
| 98 |
CommandLine::Run (cmdline); |
| 99 |
|
| 85 |
/* Finish */ |
100 |
/* Finish */ |
| 86 |
y2milestone("common_cert finished"); |
101 |
y2milestone("common_cert finished"); |
| 87 |
y2milestone("----------------------------------------"); |
102 |
y2milestone("----------------------------------------"); |