On Monday 2 April 2018 06:22,
Dave Woodfall <[email protected]> put forth the proposition:
On Monday 2 April 2018 00:42,
Dave Woodfall <[email protected]> put forth the proposition:
On Monday 2 April 2018 00:39,
Dave Woodfall <[email protected]> put forth the proposition:
On Sunday 1 April 2018 13:19,
Christian Brabandt <[email protected]> put forth the proposition:
On Fr, 30 Mär 2018, David Woodfall wrote:
I discovered the shtags.pl script today and wondered is it's
compatible with Getopt:Std or could it be adapted to use it?
I've installed Perl4::Corelibs anyway and I'm thinking about making a
slackware build script for it to submit to slackbuilds.org, but if it
will work with Getopt::Std I won't spend time on it.
I guess you are looking for a perl mailinglist and this is not relevant
to Vim, right? If I am wrong, please elaborate a bit more.
Best,
Christian
shtags.pl is a tag script that comes as part of vim. It is used to
generate tags for shell scripts. See:
/usr/share/vim/vim80/tools/shtags.pl
Dave
Well, shell scripts and perl scripts.
Well it works with Getopt::Std in perl 5 with very little change. I
don't know the best way to submit patches for vim, but I've attached
the small patch needed for it to work.
Dave
Just a small update to change the last modified date/time.
--
--
You received this message from the "vim_use" maillist.
Do not top-post! Type your reply below the text you are replying to.
For more information, visit http://www.vim.org/maillist.php
---
You received this message because you are subscribed to the Google Groups "vim_use" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to [email protected].
For more options, visit https://groups.google.com/d/optout.
--- /usr/share/vim/vim80/tools/shtags.pl 2018-02-19 05:48:44.000000000
+0000
+++ shtags.pl 2018-04-02 07:38:34.821200961 +0100
@@ -3,11 +3,14 @@
# shtags: create a tags file for perl scripts
#
# Author: Stephen Riehm
-# Last Changed: 96/11/27 19:46:06
+# Updated by David Woodfall <[email protected]>
+# Last Changed: 02/04/2018 7:37am
#
# "@(#) shtags 1.1 by S. Riehm"
#
+use Getopt::Std;
+
# obvious... :-)
sub usage
{
@@ -30,7 +33,7 @@
#
# 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 +48,11 @@
# 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;
