cryptonas/plugins/disks/disks.cs
lars 76e5366619 finished unittests for plugin date
finished unittests for plugin disks
finished unittests for plugin help
finished unittests for plugin language_selection
finished unittests for plugin logs
finished unittests for plugin network
finished unittests for plugin plugin_manager
finished unittests for plugin shutdown
finished unittests for plugin system_preferences
finished unittests for plugin user_manager
added english 'translations' to all plugins (by copying msgid to msgstr)
2006-11-30 14:36:53 +00:00

16 lines
419 B
Smalltalk

<?cs # $Id$ ?>
<h1><?cs var:html_escape(Lang.Plugins.disks.Title.Disks) ?></h1>
<?cs call:handle_messages() ?>
<?cs if:subcount(Data.Disks) == 0 ?>
<?cs call:hint("Plugins.disks.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(Data.Disks[index]) ?>
<?cs /loop ?>
<?cs /if ?>