GitHub/vim
1
0
Fork 0
mirror of https://github.com/vim/vim synced 2025-07-16 01:01:58 +00:00
Code Issues Packages Projects Releases Wiki Activity

Update runtime files

Browse Source
This commit is contained in:
Bram Moolenaar
2018-04-06 11:14:11 +02:00
parent d5359b24ce
commit 51ad4eaa22
9 changed files with 560 additions and 487 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
runtime/tools/shtags.pl
View File

@ -3,11 +3,12 @@
# shtags: create a tags file for perl scripts
#
# Author: Stephen Riehm
# Last Changed: 96/11/27 19:46:06
#
# "@(#) shtags 1.1 by S. Riehm"
# Updated by: David Woodfall <dave@dawoodfall.net>
# Last Changed: 2018/04/02
#
use Getopt::Std;
# obvious... :-)
sub usage
{
@ -30,7 +31,7 @@ sub version
#
# Version information
#
@id = split( ', ', 'scripts/bin/shtags, /usr/local/, LOCAL_SCRIPTS, 1.1, 96/11/27, 19:46:06' );
@id = split( ', ', 'scripts/bin/shtags, /usr/local/, LOCAL_SCRIPTS, 1.2, 18/04/02, 07:37' );
$id[0] =~ s,.*/,,;
print <<_EOVERS;
$id[0]: $id[3]
@ -45,12 +46,11 @@ _EOVERS
# initialisations
#
($program = $0) =~ s,.*/,,;
require 'getopts.pl';
#
# parse command line
#
&Getopts( "t:s:vVwx" ) || &usage();
getopts( "t:s:vVwx" ) || &usage();
$tags_file = $opt_t || 'tags';
$explicit = $opt_x;
$variable_tags = $opt_v;