From d84b39ac42882a2cc2e7f85ed5f02ada03744d9e Mon Sep 17 00:00:00 2001
From: Mark Glines <mark@glines.org>
Date: Mon, 7 Jan 2002 16:32:02 +0000
Subject: Added statfs support to kernel, lib, examples, and perl

other minor perl fixes (still unstable)
---
 perl/example.pl | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'perl/example.pl')

diff --git a/perl/example.pl b/perl/example.pl
index bc62cad..d01278c 100755
--- a/perl/example.pl
+++ b/perl/example.pl
@@ -70,6 +70,8 @@ sub e_read {
 	return substr($files{$file}{cont},$off,$buf);
 }
 
+sub e_statfs { return 255, 1, 1, 1, 1, 2 }
+
 # If you run the script directly, it will run fusermount, which will in turn
 # re-run this script.  Hence the funky semantics.
 my ($mountpoint) = "";
@@ -79,6 +81,7 @@ Fuse::main(
 	getattr=>\&e_getattr,
 	getdir=>\&e_getdir,
 	open=>\&e_open,
+	statfs=>\&e_statfs,
 	#read=>\&e_read,
 	#debug=>1, threaded=>0
 );
-- 
cgit v1.2.3