version 1.1, 1999/12/03 07:39:07 |
version 1.2, 1999/12/21 04:20:41 |
|
|
/* $OpenXM: OpenXM/src/asir99/builtin/help.c,v 1.1.1.1 1999/11/10 08:12:25 noro Exp $ */ |
/* $OpenXM: OpenXM_contrib2/asir2000/builtin/help.c,v 1.1.1.1 1999/12/03 07:39:07 noro Exp $ */ |
#include "ca.h" |
#include "ca.h" |
#include "parse.h" |
#include "parse.h" |
|
|
|
|
{ |
{ |
extern char *asir_libdir; |
extern char *asir_libdir; |
extern char *asir_pager; |
extern char *asir_pager; |
|
char *e; |
|
static char helpdir[16]; |
|
|
|
if ( !helpdir[0] ) { |
|
e = (char *)getenv("LANG"); |
|
if ( !e ) |
|
strcpy(helpdir,"help"); |
|
else if ( !strncmp(e,"japan",strlen("japan")) |
|
|| !strncmp(e,"ja_JP",strlen("ja_JP")) ) |
|
strcpy(helpdir,"help-jp"); |
|
else |
|
strcpy(helpdir,"help-eg"); |
|
} |
|
|
if ( !s ) |
if ( !s ) |
ghelp(); |
ghelp(); |
else { |
else { |
|
|
char name[BUFSIZ],com[BUFSIZ]; |
char name[BUFSIZ],com[BUFSIZ]; |
FILE *fp; |
FILE *fp; |
|
|
sprintf(name,"%s/help/%s",asir_libdir,s); |
sprintf(name,"%s/%s/%s",asir_libdir,helpdir,s); |
if ( fp = fopen(name,"r") ) { |
if ( fp = fopen(name,"r") ) { |
fclose(fp); |
fclose(fp); |
sprintf(com,"%s %s",asir_pager,name); |
sprintf(com,"%s %s",asir_pager,name); |