@@ -22,13 +22,6 @@

 #define PLUGINNAME "prototypes"

 #define MAXINDEXDATALEN 1024

-typedef enum protolang_t {

-        protolang_undefined=-1,

-        protolang_c=0,

-        protolang_tcl,

-        protolang_end,

-} protolang_t;

-

 typedef struct protoindex_t {

         int nentries;

         const char **index;

@@ -232,16 +225,8 @@ redata_prototypes_get(redata_t *redata, long pos)

         } status;

         if(redata==NULL || pos<0 || (cproto=cproto_getplugin(redata))==NULL)

                 return(NULL); /* sanity check failed */

-        if(cproto->lastprotolang==protolang_undefined) {

-                char linebuf[1024];

-                if(redata_line_getstartstr(redata,0,linebuf,sizeof(linebuf))!=0)

-                        return(NULL); /* couldn't detect file type using first line */

-                if(linebuf[0]=='#' && (mystrstr(linebuf,"tclsh")!=NULL || mystrstr(linebuf,"wish")!=NULL || mystrstr(linebuf,"expect")!=NULL))

-                        cproto->lastprotolang=protolang_tcl;

-                else

-                        cproto->lastprotolang=protolang_c;

-                cproto->lastpos=-1;

-        }

+        if(cproto->lastprotolang==protolang_undefined)

+                redata_prototypes_detectlang(redata);

         protoindex=cproto->protoindexes+cproto->lastprotolang;

         if(pos==cproto->lastpos)

                 return((cproto->lastindex!=-1)?(protoindex->values[cproto->lastindex]):NULL);

@@ -339,8 +324,22 @@ redata_prototypes_get(redata_t *redata, long pos)

         return(NULL);

 }

-

-

+protolang_t

+redata_prototypes_detectlang(redata_t *redata)

+{

+        cproto_t *cproto;

+        char linebuf[1024];

+        if(redata==NULL || (cproto=cproto_getplugin(redata))==NULL)

+                return(protolang_undefined); /* sanity check failed */

+        if(redata_line_getstartstr(redata,0,linebuf,sizeof(linebuf))!=0)

+                return(protolang_undefined); /* couldn't detect file type using first line */

+        if(linebuf[0]=='#' && (mystrstr(linebuf,"tclsh")!=NULL || mystrstr(linebuf,"wish")!=NULL || mystrstr(linebuf,"expect")!=NULL))

+                cproto->lastprotolang=protolang_tcl;

+        else

+                cproto->lastprotolang=protolang_c;

+        cproto->lastpos=-1;

+        return(cproto->lastprotolang);

+}

 static int

 cproto_buffer_inv(cproto_t *cproto)

@@ -11,8 +11,19 @@

  * This program is licensed under the terms of GNU GPL v2.1+

  */

+#ifndef RE_PLUGIN_PROTOTYPES_H

+#define RE_PLUGIN_PROTOTYPES_H

+typedef enum protolang_t {

+        protolang_undefined=-1,

+        protolang_c=0,

+        protolang_tcl,

+        protolang_end,

+} protolang_t;

 int redata_prototypes_register(redata_t *redata, redata_plugin_t *slot);

 int redata_prototypes_unregister(redata_t *redata, redata_plugin_t *slot,char *filename);

 const char *redata_prototypes_get(redata_t *redata, long pos);

+

+protolang_t redata_prototypes_detectlang(redata_t *redata);

+#endif

@@ -150,7 +150,8 @@ typedef enum typeprintout_t {

         printoutView=0,

         printoutCopy,

         printoutHelp,

-        printoutManpage

+        printoutManpage,

+        printoutManpageCurlang,

 } typeprintout_t;

 typedef struct printout_t {

@@ -540,7 +541,9 @@ fprintf(stderr,"RENDER\n");

                                         case SDL_MOUSEMOTION:

                                                 if(!(event.type==SDL_MOUSEMOTION && re->mouseselactive==0)

                                                   && printout->type!=printoutHelp

-                                                  && printout->type!=printoutManpage) {

+                                                  && printout->type!=printoutManpage

+                                                  && printout->type!=printoutManpageCurlang

+                                                ) {

                                                         int mx,my;

                                                         int newposx,newposy;

                                                         long tmppos;

@@ -1369,6 +1372,8 @@ fprintf(stderr,"SDL_KEYDOWN: BACKSPACE%s\n",(event==&fakeevent)?" (fake)":"");

                 re_addprint(re,printoutHelp);

         } else if(event->key.keysym.sym==SDLK_F1 && (SDL_GetModState()&KMOD_CTRL)!=0 && (SDL_GetModState()&(KMOD_SHIFT|KMOD_ALT))==0 ) {

                 re_addprint(re,printoutManpage);

+        } else if(event->key.keysym.sym==SDLK_F1 && (SDL_GetModState()&KMOD_CTRL)!=0 && (SDL_GetModState()&KMOD_SHIFT)!=0 && (SDL_GetModState()&KMOD_ALT)==0) {

+                re_addprint(re,printoutManpageCurlang);

         } else if(event->key.keysym.sym==SDLK_F2 || (event->key.keysym.sym==SDLK_s && (SDL_GetModState()&KMOD_CTRL)!=0)) {

                 char *errormsg=NULL;

                 if(redata_save(re->data,re->filename,&errormsg)!=-1)

@@ -2360,7 +2365,7 @@ Printout window\n\

                         redata_op_add(re->prints[i].data,0,helptext,sizeof(helptext)-1,NULL);

                         re->contentsdirty=1;

                 }

-        } else if(typeprintout==printoutManpage) {

+        } else if(typeprintout==printoutManpage || typeprintout==printoutManpageCurlang) {

                 char searchbuf[1024]; /* magic number: max. size of string to search (truncated if bigger) */

                 char title[256];

                 int lenprefix;

@@ -2368,7 +2373,11 @@ Printout window\n\

                 long tmppos;

                 int nread;

                 FILE *fp;

-                strncpy(searchbuf,"man ",sizeof(searchbuf));

+                protolang_t curlang;

+                curlang=redata_prototypes_detectlang(re->data);

+                strncpy(searchbuf,(typeprintout==printoutManpageCurlang && curlang==protolang_c)?"man 2 "

+                                  :(typeprintout==printoutManpageCurlang && curlang==protolang_tcl)?"man 3tcl "

+                                  :"man ",sizeof(searchbuf));

                 searchbuf[sizeof(searchbuf)-1]='\0';

                 lenprefix=strlen(searchbuf);

                 fp=NULL;

@@ -2699,6 +2708,7 @@ re_drawcontents(re_t *re, printout_t *printout)

         flaglineno=(printout==NULL)?re->showlinenumbers:

                    (printout->type==printoutHelp)?0:

                    (printout->type==printoutManpage)?0:

+                   (printout->type==printoutManpageCurlang)?0:

                    1;

         linenosize=linenowidth=0;

         if(printout==NULL && re->viewonly==1) {

@@ -2731,7 +2741,7 @@ re_drawcontents(re_t *re, printout_t *printout)

         }

         if(redata_linecol2pos(data,curline,curcol,&cursorpos,NULL)!=0)

                 return(0); /* error obtaining position */

-        bgcolor=(printout!=NULL && (printout->type==printoutHelp || printout->type==printoutManpage))

+        bgcolor=(printout!=NULL && (printout->type==printoutHelp || printout->type==printoutManpage || printout->type==printoutManpageCurlang ))

                 ?COLOR_PRINTOUTSTRIPE(re)

                 :COLOR_BACKGROUND(re);

         reui_fill(ui,x0-linenowidth,y0,w,h,bgcolor);

@@ -2748,7 +2758,7 @@ re_drawcontents(re_t *re, printout_t *printout)

         /* highlight current line (in printouts, highlight alternating lines) */

         if(printout==NULL) {

                 reui_fill(ui,x0-linenowidth,y0+(curline-originline)*ui->fontheight,w,ui->fontheight+1,COLOR_PRINTOUTSTRIPE(re));

-        } else if(printout!=NULL && (printout->type==printoutHelp || printout->type==printoutManpage)) {

+        } else if(printout!=NULL && (printout->type==printoutHelp || printout->type==printoutManpage || printout->type==printoutManpageCurlang)) {

                 ; /* help bgcolor already filled */

         } else {

                 for(y=y0+((printout->data==NULL)?1:(printout->originline%2))*ui->fontheight;y<(y0+h);y+=ui->fontheight*2)