|
|
|
@ -22,7 +22,7 @@ use Time::Local;
|
|
|
|
|
# along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
|
#------------------------------------------------------------------------------
|
|
|
|
|
my %data; #объявим хэш переменных
|
|
|
|
|
$data{"calcver"} = "1.3.2";
|
|
|
|
|
$data{"calcver"} = "1.3.3";
|
|
|
|
|
|
|
|
|
|
#Определим путь к программе
|
|
|
|
|
if(!getpath()){exit;};
|
|
|
|
@ -6938,6 +6938,9 @@ sub check_removable{
|
|
|
|
|
if(!$dev || !$data{hal}){return "hdd";}
|
|
|
|
|
$dev =~m#^(/dev/[^\/0-9]+)[0-9]?[0-9]?$#;
|
|
|
|
|
my $disk = $1;
|
|
|
|
|
if( !$disk ) {
|
|
|
|
|
return "hdd";
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
my $isusb = `$data{path} hal-find-by-property --key block.device --string $disk | xargs -I {} hal-get-property --udi '{}' --key storage.bus 2>/dev/null`;
|
|
|
|
|
chomp($isusb);
|
|
|
|
|