terminal user interface to jujutsu. Focused on speed and clarity
insert previous
+22
-1
+19
jj_tui/bin/graph_commands.ml
+19
jj_tui/bin/graph_commands.ml
···
82
82
(fun () ->
83
83
Cmd ([ "new"; "--no-edit"; "--insert-after" ] @ Vars.get_active_revs ())))
84
84
}
85
+
; {
86
+
id = "new_before"
87
+
; sorting_key = 6.0
88
+
; description = "Make a new change and insert it before the selected rev"
89
+
; make_cmd =
90
+
(fun () ->
91
+
Dynamic
92
+
(fun () -> Cmd ([ "new"; "--insert-before" ] @ Vars.get_active_revs ())))
93
+
}
94
+
; {
95
+
id = "new_before_no_edit"
96
+
; sorting_key = 7.0
97
+
; description = "Same as 'new insert', but without editing the new commit"
98
+
; make_cmd =
99
+
(fun () ->
100
+
Dynamic
101
+
(fun () ->
102
+
Cmd ([ "new"; "--no-edit"; "--insert-before" ] @ Vars.get_active_revs ())))
103
+
}
85
104
; {
86
105
id = "duplicate"
87
106
; sorting_key = 6.0
+1
-1
jj_tui/bin/jj_commands.ml
+1
-1
jj_tui/bin/jj_commands.ml
···
111
111
let rec render_commands ?(indent_level = 0) commands =
112
112
commands
113
113
|> Key_Map.to_list
114
-
|> List.sort_uniq (fun (_, a) (_, b) -> Float.compare a.sort_key b.sort_key)
114
+
|> List.sort (fun (_, a) (_, b) -> Float.compare a.sort_key b.sort_key)
115
115
|> List.concat_map @@ fun (key, command) ->
116
116
match command with
117
117
| {