# HG changeset patch
# User Pascal Bellard <pascal.bellard@slitaz.org>
# Date 1448276922 -3600
# Node ID 9860696beace2c8b60c14cc826063bc8d45c7c6d
# Parent  14374547435a784301358b5c7e2c9bbac6240fc1
Add file chooser (again)

diff -r 14374547435a -r 9860696beace boot.cgi
--- a/boot.cgi	Sun Nov 22 18:40:59 2015 +0100
+++ b/boot.cgi	Mon Nov 23 12:08:42 2015 +0100
@@ -403,12 +403,9 @@
 	<tr><td>$(_ 'ISO image file full path')
 			<span data-img="info" title="$(_ 'set /dev/cdrom for a physical CD-ROM')"></span>
 		</td>
-		<td><span id="iso"><input type="text" name="iso" value="$iso" /></span>
-		<button data-icon="cd" onclick="ajax('index.cgi?do=file-selection&name=iso', '1', 'iso'); return false"/>
-		</td></tr>
+		<td>$(file_chooser "iso" "$iso")</td></tr>
 	<tr><td>$(_ 'Working directory')</td>
-		<td><spam id="workdir"><input type="text" id="workdir" name="workdir" value="$workdir" /></spam>
-		<button data-icon="slitaz" onclick="ajax('index.cgi?do=dir-selection&name=workdir', '1', 'workdir'); return false"/>
+		<td>$(dir_chooser "workdir" "$workdir")</td></tr>
 		</td></tr>
 	<tr><td>$(_ 'Target partition')
 			<span data-img="info" title="$(_ 'For hard disk installation only. Will create /slitaz tree and keep other files. No partitioning and no formatting.')"></span>
diff -r 14374547435a -r 9860696beace lib/libtazpanel
--- a/lib/libtazpanel	Sun Nov 22 18:40:59 2015 +0100
+++ b/lib/libtazpanel	Mon Nov 23 12:08:42 2015 +0100
@@ -408,3 +408,18 @@
 	fi
 }
 
+# The html 'file' object does not return the full path. Ajax helps on localhost.
+
+file_chooser() {
+	cat <<EOT
+<span id="$1"><input type="text" name="$1" ${2:+value="$2" }/></span>
+<button data-icon="${3:-conf}" onclick="ajax('index.cgi?do=file-selection&name=$1', '1', '$1'); return false"/>
+EOT
+}
+
+dir_chooser() {
+	cat <<EOT
+<span id="$1"><input type="text" name="$1" ${2:+value="$2" }/></span>
+<button data-icon="${3:-slitaz}" onclick="ajax('index.cgi?do=dir-selection&name=$1', '1', '$1'); return false"/>
+EOT
+}