zbyhoo

#!/usr/bin/perl -w

use strict;

my $tag_main  = "gcc_issues";
my $tag_total = "total";
my $tag_issue = "issue";
my $tag_count = "count";
my $tag_file  = "file";
my $tag_line  = "line";

zbyhoo

function! s:ExecuteInShell(command)
   let command = join(map(split(a:command), 'expand(v:val)'))
   let winnr = bufwinnr('^' . command . '$')
   silent! execute  winnr < 0 ? 'botright new ' . fnameescape(command) : winnr . 'wincmd w'
   setlocal buftype=nowrite bufhidden=wipe nobuflisted noswapfile nowrap number
   echo 'Execute ' . command . '...'
   silent! execute 'silent %!'. command
   silent! execute 'resize ' . line('$')
   silent! redraw
   silent! execute 'au BufUnload <buffer> execute bufwinnr(' . bufnr('#') . ') . ''wincmd w'''

zbyhoo

#!/bin/bash

function usage()
{
   echo "Usage: `basename $0` [dir]"
   echo "   dir - directory to check (default is current directory)"
}

if [ "$1" == "-h" ]
then

zbyhoo

result = 0

while (line = gets)
  index = line.index(/\.[ch]pp\:[0-9]/)
  if (index == nil)
    puts line
  else
    path_end = line.index(":", index)
    linenr_end = line.index(":", path_end + 1)
  

zbyhoo

PS1='\[\e[32m\]\w `git branch 2>/dev/null | grep -e '\''^*'\'' | sed -E '\''s/^\* (.+)$/(\1) /'\''`\n\$\[\e[0m\] '

zbyhoo

#!/usr/bin/ruby

if ARGV.length != 1
   puts "usage: git2svn <file_name>"
   puts "   file_name - git patch file name"
   exit
end

separator = "\n===================================================================\n"
new_file = false