[catagits/Gitalist.git] / local-lib5 / lib / perl5 / i486-linux-gnu-thread-multi / auto / Storable / retrieve.al

# NOTE: Derived from blib/lib/Storable.pm.
# Changes made here will be lost when autosplit is run again.
# See AutoSplit.pm.
package Storable;

#line 345 "blib/lib/Storable.pm (autosplit into blib/lib/auto/Storable/retrieve.al)"
#
# retrieve
#
# Retrieve object hierarchy from disk, returning a reference to the root
# object of that tree.
#
sub retrieve {
	_retrieve($_[0], 0);
}

# end of Storable::retrieve
1;
Commit	Line	Data
3fea05b9	1	# NOTE: Derived from blib/lib/Storable.pm.
	2	# Changes made here will be lost when autosplit is run again.
	3	# See AutoSplit.pm.
	4	package Storable;
	5
	6	#line 345 "blib/lib/Storable.pm (autosplit into blib/lib/auto/Storable/retrieve.al)"
	7	#
	8	# retrieve
	9	#
	10	# Retrieve object hierarchy from disk, returning a reference to the root
	11	# object of that tree.
	12	#
	13	sub retrieve {
	14	_retrieve($_[0], 0);
	15	}
	16
	17	# end of Storable::retrieve
	18	1;