From 43c8894e56290dae4bfb93c0361bc396664e1b1f Mon Sep 17 00:00:00 2001 From: Wilmer Ricciotti Date: Thu, 8 Sep 2011 12:32:18 +0000 Subject: [PATCH] Matitaweb: Some changes in file selection dialogbox. --- matitaB/matita/index.html | 5 +++-- matitaB/matita/matitaFilesystem.ml | 14 +++++++------- matitaB/matita/matitaweb.css | 6 ++++++ matitaB/matita/treeview/xmlTree.js | 3 ++- 4 files changed, 18 insertions(+), 10 deletions(-) diff --git a/matitaB/matita/index.html b/matitaB/matita/index.html index 9a2343aa4..28e0ef68a 100644 --- a/matitaB/matita/index.html +++ b/matitaB/matita/index.html @@ -26,10 +26,10 @@ id="cursor" alt="Play" title="Execute the script until the current position of the cursor."> Bottom + id="bottom" alt="Bottom" title="Execute the whole script."> -

+

@@ -65,6 +65,7 @@ diff --git a/matitaB/matita/matitaFilesystem.ml b/matitaB/matita/matitaFilesystem.ml index ffdf9bb0d..43fb985b9 100644 --- a/matitaB/matita/matitaFilesystem.ml +++ b/matitaB/matita/matitaFilesystem.ml @@ -70,20 +70,20 @@ let html_of_library uid = let basedir = (Helm_registry.get "matita.rt_base_dir") ^ "/users/" ^ uid in - let branch text acc = + let branch lpath children = let id = newid () in - let name = Filename.basename text in + let name = Filename.basename lpath in let name = if name <> "." then name else "cic:/matita" in - "\n" ^ + "\n" ^ "\n" ^ name ^ "
\n" ^ "\n" ^ - acc ^ "\n" + children ^ "\n
" in - let leaf text = + let leaf lpath = "\n" ^ - "" ^ - (Filename.basename text) ^ "
" + "" ^ + (Filename.basename lpath) ^ "
" in let rec aux path = diff --git a/matitaB/matita/matitaweb.css b/matitaB/matita/matitaweb.css index 5510ab677..612c76b5a 100644 --- a/matitaB/matita/matitaweb.css +++ b/matitaB/matita/matitaweb.css @@ -20,6 +20,12 @@ div.diaTitle { color: white; } +input.diaFile { + margin-left: auto; + margin-right: auto; + width: 444px; +} + div.scroll { display: block; margin-left: auto; diff --git a/matitaB/matita/treeview/xmlTree.js b/matitaB/matita/treeview/xmlTree.js index 9fdbb34dd..0f3547bad 100644 --- a/matitaB/matita/treeview/xmlTree.js +++ b/matitaB/matita/treeview/xmlTree.js @@ -3,13 +3,14 @@ openImg.src = "treeview/open.gif"; var closedImg = new Image(); closedImg.src = "treeview/closed.gif"; -function showBranch(branch){ +function showBranch(branch,path){ var objBranch = document.getElementById(branch).style; if(objBranch.display=="block") objBranch.display="none"; else objBranch.display="block"; swapFolder('I' + branch); + // codice per mostrare il path nella casella di testo } function swapFolder(img){ -- 2.39.2