22 lines
		
	
	
		
			556 B
		
	
	
	
		
			Perl
		
	
	
		
			Executable File
		
	
			
		
		
	
	
			22 lines
		
	
	
		
			556 B
		
	
	
	
		
			Perl
		
	
	
		
			Executable File
		
	
#!/usr/bin/perl
 | 
						|
 | 
						|
use strict;
 | 
						|
use warnings;
 | 
						|
#
 | 
						|
# An test hook script to integrate with git to test fsmonitor.
 | 
						|
#
 | 
						|
# The hook is passed a version (currently 2) and since token
 | 
						|
# formatted as a string and outputs to stdout all files that have been
 | 
						|
# modified since the given time. Paths must be relative to the root of
 | 
						|
# the working tree and separated by a single NUL.
 | 
						|
#
 | 
						|
#echo "$0 $*" >&2
 | 
						|
my ($version, $last_update_token) = @ARGV;
 | 
						|
 | 
						|
if ($version ne 2) {
 | 
						|
	print "Unsupported query-fsmonitor hook version '$version'.\n";
 | 
						|
	exit 1;
 | 
						|
}
 | 
						|
 | 
						|
print "last_update_token\0/\0"
 |