SCM

SCM Repository

[inlinedocs] Diff of /pkg/inlinedocs/R/parsers.R
ViewVC logotype

Diff of /pkg/inlinedocs/R/parsers.R

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 191, Thu Feb 17 14:09:43 2011 UTC revision 195, Fri Feb 18 12:30:30 2011 UTC
# Line 451  Line 451 
451         extract.xxx.chunks=extract.xxx.chunks,         extract.xxx.chunks=extract.xxx.chunks,
452         ## title from first line of function def         ## title from first line of function def
453         title.from.firstline=function(src,...){         title.from.firstline=function(src,...){
454           if(length(src) && grepl("#",src[1])){           first <- src[1]
455             list(title=gsub("[^#]*#\\s*(.*)","\\1",src[1],perl=TRUE))           if(!is.character(first))return(list())
456           } else list()           if(!grepl("#",first))return(list())
457             list(title=gsub("[^#]*#\\s*(.*)","\\1",first,perl=TRUE))
458         },         },
459         ## PhG: it is tests/FUN.R!!! I would like more flexibility here         ## PhG: it is tests/FUN.R!!! I would like more flexibility here
460         ## please, let me choose which dir to use for examples!         ## please, let me choose which dir to use for examples!
# Line 664  Line 665 
665        L <-        L <-
666          list(list(title=desc[,"Title"],          list(list(title=desc[,"Title"],
667                    description=desc[,"Description"],                    description=desc[,"Description"],
668                    `tabular{ll}`=details,                    `tabular{ll}`=details))
                   author=desc[,"Maintainer"]))  
669        names(L) <- paste(desc[,"Package"],"-package",sep="")        names(L) <- paste(desc[,"Package"],"-package",sep="")
670        L        L
671      },      },

Legend:
Removed from v.191  
changed lines
  Added in v.195

R-Forge@R-project.org
ViewVC Help
Powered by ViewVC 1.0.0  
Thanks to:
Vienna University of Economics and Business University of Wisconsin - Madison Powered By FusionForge