|
@@ -312,7 +312,7 @@ let import ~from ~to_file =
|
|
|
let imported_rc : t = init ~rc:to_file () in
|
|
|
let to_import : File_com.t = File_com.init_rc ~rc:from () in
|
|
|
to_import.progs |> List.map ~f:(fun command -> new entry command)
|
|
|
- |> imported_rc#change_entries
|
|
|
+ |> imported_rc#add_entries
|
|
|
|> fun rc -> rc#write;
|
|
|
Messages.ok "Import successful!";
|
|
|
sprintf "from: %s; to: %s" (Lazy.force from) (Lazy.force to_file)
|