more hacks to add singleton packages

epel9
Jens Petersen 15 years ago
parent a362bcafa0
commit e328bbd33c

@ -12,11 +12,12 @@ cd .pkg-deps
# remove the closing line # remove the closing line
ghc-pkg dot --global | sed '$d' > pkgs.dot ghc-pkg dot --global | sed '$d' > pkgs.dot
# check for binary deps too (but not binlib) # check for binary deps too
for i in alex cabal-install happy haskell-platform hedgewars hlint kaya; do for i in alex cabal-install cpphs darcs ghc happy haskell-platform hedgewars hscolour kaya xmonad; do
PKG_THERE=yes PKG_THERE=yes
PKG=`rpm -q --qf "%{name}-%{version}" $i` || PKG_THERE=no PKG=`rpm -q --qf "%{name}-%{version}" $i` || PKG_THERE=no
if [ "$PKG_THERE" = "yes" ]; then if [ "$PKG_THERE" = "yes" ]; then
echo \"$PKG\" >> pkgs.dot
case $i in case $i in
haskell-platform) haskell-platform)
rpm -q --requires $i | grep -v rpmlib | grep -v ghc | sed -e "s/^/\"$PKG\" -> \"/g" -e "s/ = \(.*\)/-\1\"/" >> pkgs.dot rpm -q --requires $i | grep -v rpmlib | grep -v ghc | sed -e "s/^/\"$PKG\" -> \"/g" -e "s/ = \(.*\)/-\1\"/" >> pkgs.dot
@ -28,6 +29,9 @@ for i in alex cabal-install happy haskell-platform hedgewars hlint kaya; do
fi fi
done done
# make sure all libs there
rpm -qa --qf "\"%{name}-%{version}\"\n" ghc-\* | egrep -v -- "(ghc-libs|-prof|-devel|-doc)-" | sed -e s/^\"ghc-/\"/g >> pkgs.dot
# and add it back # and add it back
echo "}" >> pkgs.dot echo "}" >> pkgs.dot
@ -41,4 +45,6 @@ cat pkgs.dot | tred | dot -Nfontsize=8 -Tsvg >pkgs.svg
if [ -n "$DISPLAY" ]; then if [ -n "$DISPLAY" ]; then
xdg-open pkgs.svg xdg-open pkgs.svg
else
echo open ".pkg-deps/pkgs.svg" to display pkg graph
fi fi

Loading…
Cancel
Save