View Source

[/]
.htaccess
app.css
app.js
archive/
documentation.wtcl
download.wtcl
examples/
feedback.wtcl
home.wtcl
img/
index.wtcl
lib/
people/
source.wtcl
viewSource.wtcl
 File: / viewSource.wtcl

Lines Size Modified Created Owner MIME Types
23 489 2010/08/20 00:10:14 2011/06/13 15:35:15 BUILTIN\Administrators application/x-wtcl, text/x-wtcl

0001 
<?
0002 



0003

include lib/page.wtcl



0004




0005

::wt::examples::setTitle "View Source"



0006




0007

set subPath [queryParams get path]



0008

set sysPath [file dirname \



0009

  [::wt::server::serverVars get SCRIPT_FILENAME]]



0010

set viewUrl [::wt::examples::appUrl /view]



0011

set baseUrl [::wt::examples::appUrl]



0012




0013

::wt::fileBrowser::init



0014

::wt::fileBrowser::addPermission people read 0



0015

::wt::fileBrowser::printView $subPath $sysPath $viewUrl $baseUrl



0016




0017

include lib/header.wtcl



0018




0019

?>



0020




0021

[::wt::fileBrowser::printHtml]



0022




0023

<? include lib/footer.wtcl ?>