summaryrefslogtreecommitdiff
path: root/src/options.ml
diff options
context:
space:
mode:
Diffstat (limited to 'src/options.ml')
-rw-r--r--src/options.ml15
1 files changed, 7 insertions, 8 deletions
diff --git a/src/options.ml b/src/options.ml
index a57c28b..341c0bb 100644
--- a/src/options.ml
+++ b/src/options.ml
@@ -1,8 +1,7 @@
1type t = { height: int; ascii: bool; marker: Marker.t} 1type t = { height : int; ascii : bool; marker : Marker.t }
2let default = 2
3 { height = 14 3let default = { height = 14; ascii = false; marker = Marker.Circle }
4 ; ascii = false 4
5 ; marker = Marker.Point 5let with_height v c = { c with height = v }
6 } 6
7let with_height v c = { c with height = v; } 7let with_marker v c = { c with marker = v }
8let with_marker v c = { c with marker = v; }