Function to flash SheevaPlug u-boot sectors

This function is used by the SheevaPlug installer to flash the
erase and re-flash the U-Boot environment in the NAND Flash.

tcl/board/sheevaplug.cfg

@@ -110,6 +110,17 @@ proc sheevaplug_reflash_uboot { } {
 
 }
 
+proc sheevaplug_reflash_uboot_env { } {
+
+	# reflash the u-Boot environment variables area
+	sheevaplug_init
+	nand probe 0
+	nand erase 0 0xa0000 0x40000
+	nand write 0 uboot-env.bin 0xa0000 oob_softecc_kw
+	resume
+
+}
+
 proc sheevaplug_load_uboot { } {
 
 	# load u-Boot into RAM and execute it