diff --git a/gui/dialogs/clouds.xml b/gui/dialogs/clouds.xml
index d1147966a..ddf2d595b 100644
--- a/gui/dialogs/clouds.xml
+++ b/gui/dialogs/clouds.xml
@@ -11,6 +11,16 @@
  <hrule/>
 
 
+ <nasal>
+  <open>
+    var rebuild = func {
+        var p = "/environment/rebuild-layers";
+        setprop(p, getprop(p) + 1);
+    }
+  </open>
+ </nasal>
+
+
  <!-- Header Row -->
 
  <group>
@@ -76,6 +86,10 @@
    <binding>
     <command>dialog-apply</command>
    </binding>
+   <binding>
+    <command>nasal</command>
+    <script>rebuild()</script>
+   </binding>
   </combo>
 
   <input>
@@ -122,6 +136,10 @@
    <binding>
     <command>dialog-apply</command>
    </binding>
+   <binding>
+    <command>nasal</command>
+    <script>rebuild()</script>
+   </binding>
   </combo>
 
   <input>
@@ -168,6 +186,10 @@
    <binding>
     <command>dialog-apply</command>
    </binding>
+   <binding>
+    <command>nasal</command>
+    <script>rebuild()</script>
+   </binding>
   </combo>
 
   <input>
@@ -214,6 +236,10 @@
    <binding>
     <command>dialog-apply</command>
    </binding>
+   <binding>
+    <command>nasal</command>
+    <script>rebuild()</script>
+   </binding>
   </combo>
 
   <input>
@@ -250,6 +276,7 @@
    <col>2</col>
    <pref-width>100</pref-width>
    <live>true</live>
+   <editable>false</editable>
    <property>/environment/clouds/layer[0]/coverage</property>
    <value>clear</value>
    <value>few</value>
@@ -260,6 +287,10 @@
    <binding>
     <command>dialog-apply</command>
    </binding>
+   <binding>
+    <command>nasal</command>
+    <script>rebuild()</script>
+   </binding>
   </combo>
 
   <input>