mirror of
https://github.com/ilyakooo0/nixpkgs.git
synced 2024-12-26 04:43:09 +03:00
Add patch to fix arrow display
svn path=/nixpkgs/trunk/; revision=22934
This commit is contained in:
parent
8dca34b5ed
commit
9456c0e43b
@ -0,0 +1,34 @@
|
||||
# patch "agraph.ml"
|
||||
# from [8ae6c9bb70bbf9fd80e4e62d9f162ac581619b9e]
|
||||
# to [05aa88921481ac9bfe238daeb4374fbc9993caaa]
|
||||
#
|
||||
============================================================
|
||||
--- a/agraph.ml 8ae6c9bb70bbf9fd80e4e62d9f162ac581619b9e
|
||||
+++ b/agraph.ml 05aa88921481ac9bfe238daeb4374fbc9993caaa
|
||||
@@ -50,8 +50,9 @@ let dot_format params agraph =
|
||||
agraph.nodes in
|
||||
|
||||
!+ "digraph \"monotone-viz\"\n{\n" ;
|
||||
- if params.lr_layout then
|
||||
- !+ " graph [rankdir=LR] ;\n" ;
|
||||
+ if params.lr_layout
|
||||
+ then !+ " graph [rankdir=LR] ;\n"
|
||||
+ else !+ " graph [rankdir=BT] ;\n" ;
|
||||
!+ " graph [ranksep=\"0.25\"] ;\n" ;
|
||||
!+ " node [label=\"\"] ;\n" ;
|
||||
|
||||
@@ -222,11 +223,11 @@ let spawn_dot graph status done_cb =
|
||||
let dot_prg = graph.layout_params.dot_program in
|
||||
let cmd =
|
||||
if Viz_misc.debug "dot"
|
||||
- then [ "/bin/sh" ; "-c" ;
|
||||
+ then [ "/bin/sh" ; "-c" ;
|
||||
Printf.sprintf
|
||||
"set -o pipefail ; \
|
||||
- tee agraph.in.dot | %s -q -y -s%.0f | tee agraph.out.dot" dot_prg ppi ]
|
||||
- else [ dot_prg ; "-q" ; "-y" ; Printf.sprintf "-s%.0f" ppi ] in
|
||||
+ tee agraph.in.dot | %s -q -s%.0f | tee agraph.out.dot" dot_prg ppi ]
|
||||
+ else [ dot_prg ; "-q" ; Printf.sprintf "-s%.0f" ppi ] in
|
||||
let error fmt =
|
||||
Printf.kprintf (fun s -> done_cb (`LAYOUT_ERROR s)) fmt in
|
||||
try
|
@ -13,13 +13,15 @@ rec {
|
||||
configureFlags = ["--with-lablgtk-dir=${lablgtk}/lib/ocaml/lablgtk2"];
|
||||
|
||||
/* doConfigure should be specified separately */
|
||||
phaseNames = ["doAutoconf" "doConfigure" "doMakeInstall"];
|
||||
phaseNames = ["doAutoconf" "doPatch" "doConfigure" "doMakeInstall"];
|
||||
|
||||
doAutoconf = fullDepEntry(''
|
||||
aclocal -I .
|
||||
autoconf -I .
|
||||
'') ["minInit" "addInputs" "doUnpack"];
|
||||
|
||||
patches = [ ./graphviz.patch ];
|
||||
|
||||
name = "monotone-viz-mtn-head";
|
||||
meta = {
|
||||
description = "Monotone commit tree visualizer";
|
||||
|
Loading…
Reference in New Issue
Block a user