From: <ha...@us...> - 2009-05-30 09:53:53
|
Revision: 5879 http://octave.svn.sourceforge.net/octave/?rev=5879&view=rev Author: hauberg Date: 2009-05-30 09:53:50 +0000 (Sat, 30 May 2009) Log Message: ----------- Improve package index page Modified Paths: -------------- trunk/octave-forge/extra/generate_html/inst/generate_package_html.m Modified: trunk/octave-forge/extra/generate_html/inst/generate_package_html.m =================================================================== --- trunk/octave-forge/extra/generate_html/inst/generate_package_html.m 2009-05-29 08:24:57 UTC (rev 5878) +++ trunk/octave-forge/extra/generate_html/inst/generate_package_html.m 2009-05-30 09:53:50 UTC (rev 5879) @@ -67,7 +67,7 @@ elseif (ischar (name)) packname = name; pkg ("load", name); - desc = pkg ("describe", name){1}; + desc = pkg ("describe", name) {1}; else error (["generate_package_html: first input must either be the name of a ", ... "package, or a structure giving its description."]); @@ -211,6 +211,19 @@ ## Write index file ## ###################### if (isfield (options, "include_package_page") && options.include_package_page) + ## Get detailed information about the package + all_list = pkg ("list"); + list = []; + for k = 1:length (all_list) + if (strcmp (all_list {k}.name, packname)) + list = all_list {k}; + endif + endfor + if (isempty (list)) + error ("generate_package_html: couldn't locate package '%s'", packname); + endif + + ## Open output file index_filename = "index.html"; if (!exist (fullfile (outdir, packname), "dir")) @@ -222,14 +235,16 @@ error ("generate_package_html: couldn't open index file for writing"); endif + ## Write output [header, title, footer] = get_index_header_title_and_footer (options, desc.name, "../"); fprintf (fid, "%s\n", header); fprintf (fid, "<h2 class=\"tbdesc\">%s</h2>\n\n", desc.name); fprintf (fid, "<table id=\"main_package_table\">\n"); fprintf (fid, "<tr><td>Package Name:</td><td>%s</td></tr>\n", desc.name); - if (isfield (desc, "version")) - fprintf (fid, "<tr><td>Package Version:</td><td>%s</td></tr>\n", desc.version); + fprintf (fid, "<tr><td>Package Version:</td><td>%s</td></tr>\n", list.version); + if (isfield (list, "license")) + fprintf (fid, "<tr><td>Package License:</td><td>%s</td></tr>\n", list.license); endif if (isfield (options, "download_link")) This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. |
From: <ha...@us...> - 2009-06-13 22:41:24
|
Revision: 5939 http://octave.svn.sourceforge.net/octave/?rev=5939&view=rev Author: hauberg Date: 2009-06-13 22:41:22 +0000 (Sat, 13 Jun 2009) Log Message: ----------- Use packname instead of name Modified Paths: -------------- trunk/octave-forge/extra/generate_html/inst/generate_package_html.m Modified: trunk/octave-forge/extra/generate_html/inst/generate_package_html.m =================================================================== --- trunk/octave-forge/extra/generate_html/inst/generate_package_html.m 2009-06-13 21:23:48 UTC (rev 5938) +++ trunk/octave-forge/extra/generate_html/inst/generate_package_html.m 2009-06-13 22:41:22 UTC (rev 5939) @@ -74,7 +74,7 @@ endif if (isempty (outdir)) - outdir = name; + outdir = packname; elseif (!ischar (outdir)) error ("generate_package_html: second input argument must be a string"); endif @@ -84,12 +84,12 @@ mkdir (outdir); endif - packdir = fullfile (outdir, name); + packdir = fullfile (outdir, packname); if (!exist (packdir, "dir")) mkdir (packdir); endif - [local_fundir, fundir] = mk_function_dir (packdir, name, options); + [local_fundir, fundir] = mk_function_dir (packdir, packname, options); ## If options is a string, call get_html_options if (ischar (options)) This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. |
From: <ha...@us...> - 2010-02-07 06:41:54
|
Revision: 6833 http://octave.svn.sourceforge.net/octave/?rev=6833&view=rev Author: hauberg Date: 2010-02-07 06:41:41 +0000 (Sun, 07 Feb 2010) Log Message: ----------- Include a link to older pages and get rid of the double title Modified Paths: -------------- trunk/octave-forge/extra/generate_html/inst/generate_package_html.m Modified: trunk/octave-forge/extra/generate_html/inst/generate_package_html.m =================================================================== --- trunk/octave-forge/extra/generate_html/inst/generate_package_html.m 2010-02-05 18:02:16 UTC (rev 6832) +++ trunk/octave-forge/extra/generate_html/inst/generate_package_html.m 2010-02-07 06:41:41 UTC (rev 6833) @@ -276,7 +276,7 @@ fprintf (fid, "<table>\n"); fprintf (fid, "<tr><td rowspan=\"2\" class=\"box_table\">\n"); fprintf (fid, "<div class=\"package_box\">\n"); - fprintf (fid, " <div class=\"package_box_header\">%s</div>\n", desc.name); + fprintf (fid, " <div class=\"package_box_header\"></div>\n"); fprintf (fid, " <div class=\"package_box_contents\">\n"); fprintf (fid, " <table>\n"); fprintf (fid, " <tr><td class=\"package_table\">Package Version:</td><td>%s</td></tr>\n", @@ -309,7 +309,9 @@ fprintf (fid, " <a href=\"%s\"\n", link); fprintf (fid, " class=\"download_link\">\n"); fprintf (fid, " Download Package\n"); - fprintf (fid, " </a>\n"); + fprintf (fid, " </a><br>\n"); + fprintf (fid, " <a href=\"http://sourceforge.net/projects/octave/files/\""); + fprintf (fid, " class=\"older_versions_download\">(older versions)</a>\n"); fprintf (fid, " </td></tr></table>\n"); fprintf (fid, "</div>\n"); endif @@ -414,6 +416,7 @@ fprintf (fid, "%s\n", header); fprintf (fid, "<h2 class=\"tbdesc\">License for '%s' Package</h2>\n\n", desc.name); + fprintf (fid, "<p><a href=\"index.html\">Return to the '%s' package</a></p>\n\n", desc.name); fprintf (fid, "<pre>%s</pre>\n\n", contents); This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. |
From: <ha...@us...> - 2010-02-26 05:09:12
|
Revision: 6960 http://octave.svn.sourceforge.net/octave/?rev=6960&view=rev Author: hauberg Date: 2010-02-26 05:09:03 +0000 (Fri, 26 Feb 2010) Log Message: ----------- Make sure root path is correct for classes as well Modified Paths: -------------- trunk/octave-forge/extra/generate_html/inst/generate_package_html.m Modified: trunk/octave-forge/extra/generate_html/inst/generate_package_html.m =================================================================== --- trunk/octave-forge/extra/generate_html/inst/generate_package_html.m 2010-02-25 10:15:24 UTC (rev 6959) +++ trunk/octave-forge/extra/generate_html/inst/generate_package_html.m 2010-02-26 05:09:03 UTC (rev 6960) @@ -125,10 +125,13 @@ if (any (fun == filesep ())) at_dir = fileparts (fun); mkdir (fullfile (fundir, at_dir)); + r = "../../../"; + else + r = "../../"; endif outname = fullfile (fundir, sprintf ("%s.html", fun)); try - html_help_text (fun, outname, options, "../../"); + html_help_text (fun, outname, options, r); implemented {k}{l} = true; catch warning ("marking '%s' as not implemented", fun); This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. |