projects
/
perl-fuse.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
When testing, check if '/proc/mounts' exists.
[perl-fuse.git]
/
Fuse.pm
diff --git
a/Fuse.pm
b/Fuse.pm
index
1d83039
..
060ab99
100755
(executable)
--- a/
Fuse.pm
+++ b/
Fuse.pm
@@
-10,7
+10,6
@@
use Config;
require Exporter;
require DynaLoader;
use AutoLoader;
require Exporter;
require DynaLoader;
use AutoLoader;
-use Data::Dumper;
our @ISA = qw(Exporter DynaLoader);
# Items to export into callers namespace by default. Note: do not export
our @ISA = qw(Exporter DynaLoader);
# Items to export into callers namespace by default. Note: do not export
@@
-28,7
+27,7
@@
our %EXPORT_TAGS = (
our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );
our @EXPORT = ();
our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );
our @EXPORT = ();
-our $VERSION = '0.1
1
';
+our $VERSION = '0.1
2
';
sub AUTOLOAD {
# This AUTOLOAD is used to 'autoload' constants from the constant()
sub AUTOLOAD {
# This AUTOLOAD is used to 'autoload' constants from the constant()
@@
-62,16
+61,6
@@
sub AUTOLOAD {
goto &$AUTOLOAD;
}
goto &$AUTOLOAD;
}
-sub XATTR_CREATE {
- # See <sys/xattr.h>.
- return 1;
-}
-
-sub XATTR_REPLACE {
- # See <sys/xattr.h>.
- return 2;
-}
-
bootstrap Fuse $VERSION;
sub main {
bootstrap Fuse $VERSION;
sub main {
@@
-337,11
+326,6
@@
This is used to obtain directory listings. It's opendir(), readdir(), filldir()
example rv: return ('.', 'a', 'b', 0);
example rv: return ('.', 'a', 'b', 0);
-=head3 readdir
-
-Arguments: Directory name, offset
-Returns: filename, offset to the next dirent, numeric errno 0 or -ENOENT()
-
=head3 mknod
Arguments: Filename, numeric modes, numeric device
=head3 mknod
Arguments: Filename, numeric modes, numeric device