terminal user interface to jujutsu. Focused on speed and clarity
remove graph selection prompts
+6
-15
+6
-13
jj_tui/bin/file_view.ml
+6
-13
jj_tui/bin/file_view.ml
···
18
18
; cmd =
19
19
Fun
20
20
(fun _ ->
21
-
ui_state.show_popup $= Some (commands_list_ui ~include_arrows:true command_mapping, "Help");
21
+
ui_state.show_popup
22
+
$= Some (commands_list_ui ~include_arrows:true command_mapping, "Help");
22
23
ui_state.input $= `Mode (fun _ -> `Unhandled))
23
24
}
24
25
; {
25
26
key = 'm'
26
27
; description = "Move file to other commit"
27
28
; cmd =
28
-
Selection_prompt
29
+
PromptThen
29
30
( "Revision to move file to"
30
-
, (ui_state.graph_revs|>Lwd.get|>$Array.to_list)
31
-
, (fun x y->
32
-
33
-
match y with
34
-
|Unique {change_id; commit_id} -> change_id|>String.starts_with ~prefix:x
35
-
|Duplicate{change_id; commit_id} ->true
36
-
),
37
-
38
-
(fun rev ->
31
+
, fun rev ->
39
32
Cmd
40
33
[
41
34
"squash"
···
44
37
; "--from"
45
38
; get_selected_rev ()
46
39
; "--into"
47
-
; get_unique_id rev
40
+
; rev
48
41
; Lwd.peek selected_file
49
-
]) )
42
+
] )
50
43
}
51
44
; {
52
45
key = 'N'