Libraryless. Click here for Pure Java version (15096L/109K).
1 | !7 |
2 | |
3 | module BurnDVD {
|
4 | S directory, dvdDrive; |
5 | bool add; |
6 | |
7 | start {
|
8 | if (empty(dvdDrive)) setField(dvdDrive := "/dev/dvd"); |
9 | } |
10 | |
11 | visualize {
|
12 | ret makeForm3( |
13 | "Directory:", dm_fieldTextField('directory),
|
14 | "DVD drive:", dm_fieldTextField('dvdDrive),
|
15 | "", dm_fieldCheckBox("Add to DVD if there is data on it", 'add),
|
16 | "", jbutton("Burn it!", rThread burnIt));
|
17 | } |
18 | |
19 | void burnIt enter {
|
20 | assertLinux(); |
21 | if (!dirExists(directory)) |
22 | ret with infoBox("Directory doesn't exist: " + directory);
|
23 | if (contains(loadTextFile(backtickToConsole("growisofs " + (add ? "-M" : "-Z") + " " + bashQuote2(dvdDrive) + " -r -J " + bashQuote2(directory))), "FATAL"))
|
24 | infoBox("Error!");
|
25 | else |
26 | infoBox("DVD made!");
|
27 | } |
28 | } |
Began life as a copy of #1020282
download show line numbers debug dex old transpilations
Travelled to 8 computer(s): bhatertpkbcr, cfunsshuasjs, gwrvuhgaqvyk, mqqgnosmbjvj, pyentgdyhuwx, pzhvpgtvlbxg, tvejysmllsmz, vouqrxazstgt
No comments. add comment
| Snippet ID: | #1020285 |
| Snippet name: | Linux: Burn Directory To DVD (new direct version) |
| Eternal ID of this version: | #1020285/1 |
| Text MD5: | b49f87d2b4f6e02857e94e763001776d |
| Transpilation MD5: | fad8acd178dd15ed6dcc8cd3ac6b0074 |
| Author: | stefan |
| Category: | javax |
| Type: | JavaX source code (Dynamic Module) |
| Public (visible to everyone): | Yes |
| Archived (hidden from active list): | No |
| Created/modified: | 2018-12-12 16:33:13 |
| Source code size: | 789 bytes / 28 lines |
| Pitched / IR pitched: | No / No |
| Views / Downloads: | 519 / 675 |
| Referenced in: | [show references] |