From 7ef539f3318f8ed0342922c0b1b9100898fb7c91 Mon Sep 17 00:00:00 2001 From: Christopher LaChance Date: Fri, 7 Jul 2017 14:17:26 -0500 Subject: [PATCH] Replaced smartmatch operator with string equality operation. --- libexec/trick/pm/get_lib_deps.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/libexec/trick/pm/get_lib_deps.pm b/libexec/trick/pm/get_lib_deps.pm index 562c776a..a9384513 100644 --- a/libexec/trick/pm/get_lib_deps.pm +++ b/libexec/trick/pm/get_lib_deps.pm @@ -17,7 +17,6 @@ sub get_lib_deps ($$) { my (@inc_paths) ; my (@raw_lib_deps) ; - # Doxygen style @lib_list = ($contents =~ /(?:@|\\)trick_li(?:nk|b)_dependency\s*{\s*(.*?)\s*}/gs) ; @@ -180,13 +179,14 @@ sub write_lib_deps($) { } if ( -e $lib_dep_file_name ) { - # If the library dependeny file exists open the old lib dep file + # If the library dependency file exists open the old lib dep file # and compare the new and old lists. open OLDLIBDEP, "$lib_dep_file_name" ; my @old_resolved = ; close OLDLIBDEP ; chomp @old_resolved ; - if ( @old_resolved ~~ @resolved_files ) { + + if (join(", ", @old_resolved) eq join(", ", @resolved_files)) { #print "Library dependencies unchanged for $source_file_name\n" ; $deps_changed = 0 ; } else { @@ -194,7 +194,7 @@ sub write_lib_deps($) { $deps_changed = 1 ; } } else { - # If the library dependeny does not exist, the deps changed. + # If the library dependency does not exist, the deps changed. $deps_changed = 1 ; }