cryptonas-branches/pythonrewrite/plugins/disks/disks.cs
lars c35e204a7b added some basic unittests
changed warning/success message system to a new style
unified design of "hints" in form interfaces
fixed small bugs in "network" and "partition" plugin interfaces
"partition" and "disks" plugins: show blockdevice size during device selection
german translation for "disks" plugin added
2006-11-02 14:01:09 +00:00

18 lines
463 B
Smalltalk

<?cs # $Id$ ?>
<h1><?cs var:html_escape(Lang.Plugins.disks.Title.Disks) ?></h1>
<?cs call:handle_messages() ?>
<?cs # TODO: add no-disks-available warning ?>
<?cs if:subcount(Data.Disks) == 0 ?>
<?cs call:hint(Lang.Plugins.disks.Text.NoDisksAvailable) ?>
<?cs else ?>
<?cs # we use "loop" instead of "each" to keep the order of the disks ?>
<?cs loop: index = #0, subcount(Data.Disks)-1, #1 ?>
<?cs call:show_volume(index) ?>
<?cs /loop ?>
<?cs /if ?>