--- toast 2003/10/05 23:17:17 1.213 +++ toast 2003/10/13 04:34:23 1.214 @@ -1022,8 +1022,9 @@ return ".bz2" if /^BZ/; return ".zip" if /^PK\x03\x04/; return ".rpm" if /^\xed\xab\xee\xdb/; - return ".tar" if /^[^\x00]+(..)?\x00{5,}[\x00\s\d]*$/ || /\x00ustar[ \x00]/; return ".cpio" if /^07070[a-f\d]{30}/i; + return ".tar" if /^[^\x00]+(..)?\x00{5,}[\x00\s\d]{30}/ + || /\x00ustar[ \x00]/; return ".shar" if m:^\#!/bin/sh\n\# This is a shell archive:; return ".patch" if /^(diff |\*\*\* |Only in |Common subdirectories: |--- )/m;