By switching <<'END' to <<END. A future patch is going to want to put
a variable here which requires interpretation by the Perl.
Unfortunately this means lots of extra backslashes to escape things
such that they pass through Perl and Shell and end up as ${foo} in the
resulting u-boot script.
Signed-off-by: Ian Campbell <ian.campbell@citrix.com>
Acked-by: Ian Jackson <ian.jackson@eu.citrix.com>
}
sub uboot_scr_load_dtb () {
- return <<'END';
-if test -z "\${fdt_addr}" && test -n "\${fdtfile}" ; then
- echo Loading dtbs/\${fdtfile}
- ext2load scsi 0 \${fdt_addr_r} dtbs/\${fdtfile}
- setenv fdt_addr \${fdt_addr_r}
+ return <<END;
+if test -z "\\\${fdt_addr}" && test -n "\\\${fdtfile}" ; then
+ echo Loading dtbs/\\\${fdtfile}
+ ext2load scsi 0 \\\${fdt_addr_r} dtbs/\\\${fdtfile}
+ setenv fdt_addr \\\${fdt_addr_r}
fi
END
}