Changeset 28777 for trunk/base


Ignore:
Timestamp:
Sep 8, 2007, 5:42:43 PM (12 years ago)
Author:
afb@…
Message:

rewrite block as string, for tcldoc

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/base/src/port1.0/resources/group/ruby-1.0.tcl

    r25056 r28777  
    145145                                # create destroot setup file
    146146                                set fp [open ${worksrcpath}/destroot.rb w]
    147                                 puts $fp {
     147                                puts $fp "
    148148                                        require 'rbconfig'
    149149                                        include Config
    150                                         DESTROOT=ENV['DESTROOT'] || ''
     150                                        DESTROOT=ENV\['DESTROOT'\] || ''
    151151                                        CONFIG.keys.find_all { |d|
    152                                                 d.match(/dir$/) and !d.match(/(src|build|compile)/)
     152                                                d.match(/dir\$/) and !d.match(/(src|build|compile)/)
    153153                                        }.each {|confdir|
    154                                                 CONFIG[confdir]=DESTROOT+CONFIG[confdir]
     154                                                CONFIG\[confdir\]=DESTROOT+CONFIG\[confdir\]
    155155                                        }
    156                                         $:.reverse.each { |d| $:.unshift(DESTROOT+d) }
    157                                 }
     156                                        \$:.reverse.each { |d| \$:.unshift(DESTROOT+d) }
     157                                "
    158158                                close $fp
    159159                                # adjust basic install.rb script
Note: See TracChangeset for help on using the changeset viewer.