<pre style='margin:0'>
Umesh Singla (umeshksingla) pushed a commit to branch gsoc17-migrate
in repository macports-base.
</pre>
<p><a href="https://github.com/macports/macports-base/commit/805449f8a86d6744468d999c2547fb703023c256">https://github.com/macports/macports-base/commit/805449f8a86d6744468d999c2547fb703023c256</a></p>
<pre style="white-space: pre; background: #F8F8F8"><span style='display:block; white-space:pre;color:#808000;'>commit 805449f8a86d6744468d999c2547fb703023c256
</span>Author: Umesh Singla <umeshksingla@macports.org>
AuthorDate: Sat Aug 26 15:51:02 2017 +0530
<span style='display:block; white-space:pre;color:#404040;'> Remove restore part from migrate script
</span>---
src/macports1.0/migrate.tcl | 32 +++++---------------------------
1 file changed, 5 insertions(+), 27 deletions(-)
<span style='display:block; white-space:pre;color:#808080;'>diff --git a/src/macports1.0/migrate.tcl b/src/macports1.0/migrate.tcl
</span><span style='display:block; white-space:pre;color:#808080;'>index f2589eb..fef36c1 100644
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>--- a/src/macports1.0/migrate.tcl
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>+++ b/src/macports1.0/migrate.tcl
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -45,50 +45,28 @@ namespace eval migrate {
</span> # opts - options array.
# Returns:
# None
<span style='display:block; white-space:pre;background:#ffe0e0;'>- #
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>- # TODO:
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>- # make it return some value
</span>
array set options $opts
<span style='display:block; white-space:pre;background:#ffe0e0;'>- # TODO: move this to restore.tcl
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>- # if ([info exists options(ports_restore_snapshot-id)]) {
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>- # # use that snapshot
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>- # set snapshot [fetch_snapshot options(ports_restore_snapshot-id)]
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>- # } else {
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>- # # TODO: ask if the user is fine with the latest snapshot, if 'yes'
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>- # # use latest snapshot
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>- # set snapshot [fetch_latest_snapshot]
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>- # }
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-
</span> # create a snapshot
<span style='display:block; white-space:pre;background:#ffe0e0;'>- ui_msg "$macports::ui_prefix Taking a snapshot of the current state.."
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ ui_msg "$macports::ui_prefix Taking a snapshot of the current state.."
</span> set snapshot [snapshot::main $opts]
set note [$snapshot note]
set datetime [$snapshot created_at]
<span style='display:block; white-space:pre;background:#ffe0e0;'>- ui_msg "$macports::ui_prefix Done: snapshot '$note' created at $datetime"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ ui_msg "$macports::ui_prefix Done: snapshot '$note' created at $datetime"
</span>
<span style='display:block; white-space:pre;background:#ffe0e0;'>- ui_msg "$macports::ui_prefix Fetching ports.."
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ ui_msg "$macports::ui_prefix Fetching ports.."
</span> set portlist [$snapshot ports]
<span style='display:block; white-space:pre;background:#ffe0e0;'>- ui_msg "$macports::ui_prefix Uninstalling all ports.."
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ ui_msg "$macports::ui_prefix Uninstalling all ports.."
</span> uninstall_installed [registry::entry imaged]
<span style='display:block; white-space:pre;background:#ffe0e0;'>- ui_msg "$macports::ui_prefix Restoring the original state.."
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ ui_msg "$macports::ui_prefix Restoring the original state.."
</span> recover_ports_state $portlist
# TODO: CLEAN PARTIAL BUILDS STEP HERE
}
<span style='display:block; white-space:pre;background:#ffe0e0;'>- proc fetch_snapshot { snapshot_id } {
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>- }
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>- proc fetch_snapshot_details {snapshot} {
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>- return
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>- }
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-
</span> proc portlist_sort_dependencies_first {portlist} {
# Sorts a list of port references such that ports appear after
</pre><pre style='margin:0'>
</pre>