svn:r18168
@@ -70,3 +70,11 @@ fetch_digest() {
# echo "$objecttype $digest" >> failed
#fi
}
+
+if [ -x /usr/bin/base64 ] ; then
+ alias base64-decode='/usr/bin/base64 -d'
+else
+ base64-decode() {
+ perl -MMIME::Base64 -e 'print decode_base64(<>)'
+ }
+fi