summaryrefslogtreecommitdiffstats
path: root/bin/syncqt.pl
diff options
context:
space:
mode:
authorOswald Buddenhagen <oswald.buddenhagen@digia.com>2013-05-17 19:54:59 +0200
committerThe Qt Project <gerrit-noreply@qt-project.org>2013-06-12 13:02:58 +0200
commitf5a5272bc7ac5a4c3fa690d0b49be87278e5a946 (patch)
tree187c2fadd6afecd03a43d16917d72a402ad348ed /bin/syncqt.pl
parent49bee21d576df63c679584bb3665cc86cdaa1d01 (diff)
remove unused symlinkFile() function
Change-Id: Ie235fe65020ed7c4870d9c8784a181bf880b9e28 Reviewed-by: Joerg Bornemann <joerg.bornemann@digia.com>
Diffstat (limited to 'bin/syncqt.pl')
-rwxr-xr-xbin/syncqt.pl30
1 files changed, 0 insertions, 30 deletions
diff --git a/bin/syncqt.pl b/bin/syncqt.pl
index 497e8deb2c..47288ff844 100755
--- a/bin/syncqt.pl
+++ b/bin/syncqt.pl
@@ -508,36 +508,6 @@ sub copyFile
}
######################################################################
-# Syntax: symlinkFile(file, ifile)
-# Params: file, string, filename to create "symlink" for
-# ifile, string, destination name of symlink
-#
-# Purpose: File is symlinked to ifile (or copied if filesystem doesn't
-# support symlink).
-# Returns: 1 on success, else 0.
-######################################################################
-sub symlinkFile
-{
- my ($lib, $file, $ifile) = @_;
-
- if ($isunix) {
- print "$lib: symlink created for $file " if ($verbose_level);
- if ( $force_relative && ($ifile =~ /^$quoted_basedir/)) {
- my $t = getcwd();
- my $c = -1;
- my $p = "../";
- $t =~ s-^$quoted_basedir/--;
- $p .= "../" while( ($c = index( $t, "/", $c + 1)) != -1 );
- $file =~ s-^$quoted_basedir/-$p-;
- print " ($file)\n" if($verbose_level);
- }
- print "\n" if($verbose_level);
- return symlink($file, $ifile);
- }
- return copyFile($lib, $file, $ifile);
-}
-
-######################################################################
# Syntax: findFiles(dir, match, descend)
# Params: dir, string, directory to search for name
# match, string, regular expression to match in dir