[23410] in Source-Commits
/svn/athena r23064 - trunk/debathena/scripts
daemon@ATHENA.MIT.EDU (ghudson@MIT.EDU)
Thu Jul 10 11:36:24 2008
Date: Thu, 10 Jul 2008 11:36:13 -0400 (EDT)
From: ghudson@MIT.EDU
Message-Id: <200807101536.LAA29881@drugstore.mit.edu>
To: source-commits@MIT.EDU
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
Author: ghudson
Date: 2008-07-10 11:36:12 -0400 (Thu, 10 Jul 2008)
New Revision: 23064
Modified:
trunk/debathena/scripts/dasource
Log:
In dasource, chmod build dir parents to mode 777 to make work around a
bad AFS-perl interaction in dpkg-source.
Modified: trunk/debathena/scripts/dasource
===================================================================
--- trunk/debathena/scripts/dasource 2008-07-09 16:59:58 UTC (rev 23063)
+++ trunk/debathena/scripts/dasource 2008-07-10 15:36:12 UTC (rev 23064)
@@ -47,6 +47,15 @@
mkdir $pkgname
fi
+ # Work around a bad interaction between dpkg-source and AFS.
+ # (dpkg-source invokes perl's Tempfile which checks if the parent
+ # directory is writable using mode bits). This will not actually
+ # grant any outside access to the directory since AFS ignores
+ # non-user mode bits.
+ if fs whichcell . >/dev/null 2>&1; then
+ chmod 777 $pkgname
+ fi
+
# Check out or update the package source.
pattern="$pkgname/$pkgname-[0-9]*[0-9]"
if [ $(echo $pattern | wc -w) -gt 1 ]; then
