bike/gbootroot
1
0
Fork 0
mirror of https://github.com/fspc/gbootroot.git synced 2025-02-23 09:03:23 -05:00
Code Issues Projects Releases Wiki Activity

Improvement on second genext2fs regexp pass.

Browse Source
This commit is contained in:
freesource 2001-11-01 17:28:02 +00:00
parent 7886ea01f1
commit e81b3fd1ba
1 changed files with 3 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
BootRoot/Yard.pm
View File

@ -147,6 +147,7 @@ sub read_contents_file {
$text_insert->backward_delete($text_insert->get_length());
# If the template changes it is time to clear all the values.
# Delete devices table.
if ($contents_file_tmp && $contents_file_tmp ne $contents_file) {
undef %Included;
undef %replaced_by;
@ -193,19 +194,14 @@ sub read_contents_file {
if ( $line =~ m,
(?<![\w\d\+-]) # can have \s before
/dev(?![\w\d\+-]+) # match /dev
/dev(?![\w\d\+-]+?) # match /dev
,x ) {
my $expr;
my @line;
for $expr (split(' ', $line)) {
if ( $expr =~ m,
(?<![\w\d\+-]) # can have \s before
/dev(?![\w\d\+-]+) # match /dev
,x ) {
if ( m,^/dev$|^/dev/, ) {
# Do something here