[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [Feature request] global -Po
From: |
Hideki IWAMOTO |
Subject: |
Re: [Feature request] global -Po |
Date: |
Wed, 24 Dec 2003 01:19:27 +0900 |
On Sun, 21 Dec 2003 19:34:02 +0900, Shigio Yamaguchi wrote...
> Hello,
> > I hope that the path which is not a source file is searched by "global -Po."
>
> It's proper. I have made a patch for it.
>
This is a patch for adding support of "global -Po" to htags.
--- ../cvs-latest/global/htags/htags.in 2003-10-02 22:17:28.000000000 +0900
+++ htags/htags.in 2003-12-24 01:02:23.000000000 +0900
@@ -1145,7 +1145,7 @@
$iflag = 'i';
}
$oflag = '';
-if ($form{'other'} && $flag eq 'g') {
+if ($form{'other'} && ($flag eq 'g' || $flag eq 'P')) {
$oflag = 'o';
}
if ($form{'id'}) {
@@ -1158,10 +1158,11 @@
exit 0;
}
}
-if ($flag eq 'g' || $flag eq 'I' || $form{'type'} eq 'source') {
+if ($flag eq 'g' || $flag eq 'I' || $form{'type'} eq 'source' || ($flag eq 'P'
&& $oflag)) {
if (($flag eq 'g' && ! -f "../../GTAGS")
|| ($flag eq 'I' && ! -f "../../ID")
- || ($form{'type'} eq 'source' && ! -f "../../GTAGS")) {
+ || ($form{'type'} eq 'source' && ! -f "../../GTAGS")
+ || ($flag eq 'P' && $oflag && ! -f "../../GTAGS")) {
print "<H1><FONT COLOR=#cc0000>Error</FONT></H1>\n";
print "<H3>Couldn't execute command. <A
HREF=$htmlbase/address@hidden@>[return]</A></H3>\n";
print "@address@hidden";
@@ -2053,7 +2054,7 @@
}
$index .= "<BR>\n<INPUT TYPE=checkbox NAME=icase VALUE=1 TITLE='Ignore
case distinctions in the pattern.'>";
$index .= ($target) ? "Icase" : "Ignore case";
- if ($'enable_grep && $'other_files) {
+ if ($'other_files) {
$index .= "\n<INPUT TYPE=checkbox NAME=other VALUE=1
TITLE='Files other than the source code are also retrieved.'>";
$index .= ($target) ? "Other" : "Other files";
}
----
Hideki IWAMOTO address@hidden