Skip to content
Permalink
Browse files

Added -o option to ignore modification times on state file and Portfile

git-svn-id: https://svn.macports.org/repository/macports/trunk/base@2126 d073be05-634f-4543-b044-5fe20cf6d1d6
  • Loading branch information
Kevin Van Vechten
Kevin Van Vechten committed Mar 3, 2003
1 parent 9264ddf commit d9684ab3098c8165ec0cecd3f1ddcd6f03677757
Showing with 6 additions and 4 deletions.
  1. +3 −1 src/port/port.1
  2. +1 −1 src/port/port.tcl
  3. +2 −2 src/port1.0/portutil.tcl
@@ -35,7 +35,7 @@
.Nd build darwin ports
.Sh SYNOPSIS
.Nm
.Op Fl vdqo
.Op Fl vdqfo
.Op Ar target
.Op Ar portname
.Op Fl D Ar portdir
@@ -69,6 +69,8 @@ quiet mode (suppress messages)
.It Fl D
specify
.Ar portdir
.It Fl f
force mode (ignore state file)
.It Fl o
honor state files older than Portfile
.El
@@ -149,7 +149,7 @@ proc ui_display {filename} {
# Standard procedures
proc print_usage args {
global argv0
puts "Usage: $argv0 \[-vdqo\] \[action\] \[-D portdir\] \[options\]"
puts "Usage: $argv0 \[-vdqof\] \[action\] \[-D portdir\] \[options\]"
}

proc fatal args {
@@ -536,7 +536,7 @@ proc eval_targets {target} {
# open_statefile
# open file to store name of completed targets
proc open_statefile {args} {
global workpath portname portpath
global workpath portname portpath ports_ignore_older

if ![file isdirectory $workpath ] {
file mkdir $workpath
@@ -547,7 +547,7 @@ proc open_statefile {args} {
if {![file writable $statefile]} {
return -code error "$statefile is not writable - check permission on port directory"
}
if {[file mtime $statefile] < [file mtime ${portpath}/Portfile]} {
if {!([info exists ports_ignore_older] && $ports_ignore_older == "yes") && [file mtime $statefile] < [file mtime ${portpath}/Portfile]} {
ui_msg "Portfile changed since last build; discarding previous state."
file delete $statefile
}

0 comments on commit d9684ab

Please sign in to comment.
You can’t perform that action at this time.