Server IP : 180.180.241.3 / Your IP : 216.73.216.252 Web Server : Microsoft-IIS/7.5 System : Windows NT NETWORK-NHRC 6.1 build 7601 (Windows Server 2008 R2 Standard Edition Service Pack 1) i586 User : IUSR ( 0) PHP Version : 5.3.28 Disable Function : NONE MySQL : ON | cURL : ON | WGET : OFF | Perl : OFF | Python : OFF | Sudo : OFF | Pkexec : OFF Directory : C:/Program Files (x86)/Git/lib/perl5/site_perl/5.8.8/msys/SVN/ |
Upload File : |
use strict; use warnings; package SVN::Fs; use SVN::Base qw(Fs svn_fs_); =head1 NAME SVN::Fs - Subversion filesystem functions =head1 DESCRIPTION SVN::Fs wraps the functions in svn_fs.h. =head1 METHODS Please consult the svn_fs.h section in the Subversion API. =cut package _p_svn_fs_t; our @methods = qw/youngest_rev revision_root revision_prop revision_proplist change_rev_prop list_transactions open_txn begin_txn get_uuid set_uuid set_access get_access lock unlock get_lock get_locks generate_lock_token path/; for (@methods) { no strict 'refs'; *{$_} = *{"SVN::Fs::$_"}; } package _p_svn_fs_root_t; our @methods = qw/apply_textdelta apply_text change_node_prop check_path close_root copied_from copy dir_entries delete file_contents closest_copy file_length file_md5_checksum is_dir is_file is_revision_root is_txn_root make_dir make_file node_created_rev node_history node_id node_prop node_proplist paths_changed revision_link revision_root_revision/; *fs = *SVN::Fs::root_fs; *txn_name = *_p_svn_fs_txn_t::root_name; for (@methods) { no strict 'refs'; *{$_} = *{"SVN::Fs::$_"}; } package _p_svn_fs_history_t; use SVN::Base qw/Fs svn_fs_history_/; package _p_svn_fs_txn_t; use SVN::Base qw/Fs svn_fs_txn_/; *commit = *SVN::Fs::commit_txn; *abort = *SVN::Fs::abort_txn; *change_prop = *SVN::Fs::change_txn_prop; package _p_svn_fs_access_t; use SVN::Base qw(Fs svn_fs_access_); package _p_svn_fs_dirent_t; use SVN::Base qw(Fs svn_fs_dirent_t_); package _p_svn_fs_path_change_t; use SVN::Base qw(Fs svn_fs_path_change_t_); package SVN::Fs::PathChange; use SVN::Base qw(Fs svn_fs_path_change_); 1;