Recent Changes - Search:

WikiDoc

Categories

Interaction with TeX under Unix

Pipes.InteractionWithTexUnderUnix History

Hide minor edits - Show changes to markup

July 04, 2006, at 01:08 AM by agm - more of Nick's spam
Changed line 127 from:

directly? Any sub-process will inherit Alpha's 'pwd' and $env(PATH) anyway, so those can

to:

directly? Any sub-process will inherit Alpha's 'pwd' and $env(PATH) anyway, so those can

Changed lines 191-195 from:
	 set p [open "$f" r]
	 set primeraLinea [gets $p]
	 close $p
	 regexp "^%&(.+)$" $primeraLinea primeraLinea formato
	 return $formato
to:
	 set p [open "$f" r]
	 set primeraLinea [gets $p]
	 close $p
	 regexp "^%&(.+)$" $primeraLinea primeraLinea formato
	 return $formato
Changed lines 202-203 from:
	 set formato [::TeX::altComm::buscaFormato $f]
	 if {$formato == ""} {
to:
	 set formato [::TeX::altComm::buscaFormato $f]
	 if {$formato == ""} {
Changed lines 205-206 from:
	     return "pdftex  -progname=pdflatex \"$f\""
	 } elseif {[string match pdf* $formato]} {
to:
	     return "pdftex  -progname=pdflatex \"$f\""
	 } elseif {[string match pdf* $formato]} {
Changed line 208 from:
	     return "pdftex -fmt=$formato -progname=pdflatex \"$f\""
to:
	     return "pdftex -fmt=$formato -progname=pdflatex \"$f\""
Changed line 211 from:
	     return "tex -fmt=$formato -progname=latex \"$f\""
to:
	     return "tex -fmt=$formato -progname=latex \"$f\""
Changed line 221 from:
	 if { [file readable $thisFile] } {
to:
	 if { [file readable $thisFile] } {
Changed line 223 from:
	     set texPipe(filePath) [file dirname $thisFile]
to:
	     set texPipe(filePath) [file dirname $thisFile]
Changed line 226 from:
	     set texPipe(jobName) [file rootname $texPipe(jobName)]
to:
	     set texPipe(jobName) [file rootname $texPipe(jobName)]
Changed line 228 from:
	     if { $thisFile == "*TeX console*" } {
to:
	     if { $thisFile == "*TeX console*" } {
Changed line 239 from:
	 set auxFileName "$texPipe(jobName)"
to:
	 set auxFileName "$texPipe(jobName)"
Changed lines 241-242 from:
	 if { [file writable $texPipe(filePath)/$auxFileName] } {
	     exec /bin/cp $texPipe(filePath)/${auxFileName} $texPipe(filePath)/${auxFileName}.tmp
to:
	 if { [file writable $texPipe(filePath)/$auxFileName] } {
	     exec /bin/cp $texPipe(filePath)/${auxFileName} $texPipe(filePath)/${auxFileName}.tmp
Changed lines 249-250 from:
	 fconfigure $texPipe(pipeName) -buffering line -translation auto -blocking 0
to:
	 fconfigure $texPipe(pipeName) -buffering line -translation auto -blocking 0
Changed lines 252-253 from:
	 puts $texPipe(pipeName)     {PATH="/usr/local/teTeX/bin/powerpc-apple-darwin-current:${PATH}";export PATH}
to:
	 puts $texPipe(pipeName)     {PATH="/usr/local/teTeX/bin/powerpc-apple-darwin-current:${PATH}";export PATH}
Changed line 255 from:
	 puts $texPipe(pipeName) "cd $texPipe(filePath)"
to:
	 puts $texPipe(pipeName) "cd $texPipe(filePath)"
Changed lines 258-260 from:
    # change a simple $cmd for a command that is builded looking into the own file to typeset
	 puts $texPipe(pipeName) "[::TeX::altComm::cmd $thisFile] $texPipe(jobName) ; exit"
    #     puts $texPipe(pipeName) "$cmd $texPipe(jobName) ; exit"
to:
    # change a simple $cmd for a command that is builded looking into the own file to typeset
	 puts $texPipe(pipeName) "[::TeX::altComm::cmd $thisFile] $texPipe(jobName) ; exit"
    #     puts $texPipe(pipeName) "$cmd $texPipe(jobName) ; exit"
Changed lines 276-278 from:
	 fileevent $texPipe(pipeName) readable ::TeX::altComm::receiveAndDisplay

to:
	 fileevent $texPipe(pipeName) readable ::TeX::altComm::receiveAndDisplay

Changed lines 288-290 from:
	 set status [catch { set texPipe(_res) [read $texPipe(pipeName)] }]

to:
	 set status [catch { set texPipe(_res) [read $texPipe(pipeName)] }]

Changed line 292 from:
	 if { $status || [eof $texPipe(pipeName)] } {
to:
	 if { $status || [eof $texPipe(pipeName)] } {
Changed line 294 from:
	     close $texPipe(pipeName)
to:
	     close $texPipe(pipeName)
Changed line 302 from:
	 if { [string length $texPipe(_res)] } {
to:
	 if { [string length $texPipe(_res)] } {
Changed line 304 from:
		 insertText -w "*TeX console*" "$texPipe(_res)"
to:
		 insertText -w "*TeX console*" "$texPipe(_res)"
Changed lines 310-312 from:
	     set shPID [pid $texPipe(pipeName)]
	     set answer [exec ps -p $shPID]
	     if { ![regexp $shPID $answer] } {
to:
	     set shPID [pid $texPipe(pipeName)]
	     set answer [exec ps -p $shPID]
	     if { ![regexp $shPID $answer] } {
Changed line 314 from:
		 close $texPipe(pipeName)
to:
		 close $texPipe(pipeName)
Changed line 332 from:
	 regexp {[^\r\n]*$} $texPipe(_res) prompt
to:
	 regexp {[^\r\n]*$} $texPipe(_res) prompt
Changed lines 334-336 from:
	 regsub "^[quote::Regfind $prompt]" $more "" more

to:
	 regsub "^[quote::Regfind $prompt]" $more "" more

Changed lines 344-347 from:
	 if { $prompt == "? " } {


	     if { $more == "e" } {
to:
	 if { $prompt == "? " } {


	     if { $more == "e" } {
Changed lines 350-351 from:
		 set errorSpec [getText [lindex $pos 0] [lindex $pos 1]]
		 regexp {[0-9]+} $errorSpec errorLine
to:
		 set errorSpec [getText [lindex $pos 0] [lindex $pos 1]]
		 regexp {[0-9]+} $errorSpec errorLine
Changed lines 353-355 from:
		 if { ![catch {set opParPos [matchIt ")" [lindex $pos 0]]}] } {
		     set line [getText [pos::math $opParPos + 1] [pos::lineEnd $opParPos]]
		     set file [lindex $line 0]
to:
		 if { ![catch {set opParPos [matchIt ")" [lindex $pos 0]]}] } {
		     set line [getText [pos::math $opParPos + 1] [pos::lineEnd $opParPos]]
		     set file [lindex $line 0]
Changed lines 361-362 from:
    regexp {[^\{]*} $file file
		     regsub {^\./} $file "$texPipe(filePath)/" file
to:
    regexp {[^\{]*} $file file
		     regsub {^\./} $file "$texPipe(filePath)/" file
Changed line 364 from:
		     set file $texPipe(jobName).tex
to:
		     set file $texPipe(jobName).tex
Changed lines 368-369 from:
                   Transcript written on $texPipe(jobName).log.\r"
		 close $texPipe(pipeName)
to:
                   Transcript written on $texPipe(jobName).log.\r"
		 close $texPipe(pipeName)
Changed lines 371-374 from:
		 if { [lsearch -exact [winNames] [file tail $file]] >= 0 } {
		     bringToFront [file tail $file]
		 } elseif { [file readable $file] } {
		     edit $file
to:
		 if { [lsearch -exact [winNames] [file tail $file]] >= 0 } {
		     bringToFront [file tail $file]
		 } elseif { [file readable $file] } {
		     edit $file
Changed line 379 from:
		 goto [pos::fromRowCol $errorLine 0]
to:
		 goto [pos::fromRowCol $errorLine 0]
Changed line 390 from:
	 if { $more == "x" } {
to:
	 if { $more == "x" } {
Changed lines 392-393 from:
               Transcript written on $texPipe(jobName).log.\r"
	     close $texPipe(pipeName)
to:
               Transcript written on $texPipe(jobName).log.\r"
	     close $texPipe(pipeName)
Changed line 400 from:
	 puts $TeX::altComm::texPipe(pipeName) $more
to:
	 puts $TeX::altComm::texPipe(pipeName) $more
Changed line 408 from:
	 set auxFileName $texPipe(jobName)
to:
	 set auxFileName $texPipe(jobName)
Changed lines 410-412 from:
	 if { [file writable $texPipe(filePath)/${auxFileName}] 	   && [file readable $texPipe(filePath)/${auxFileName}.tmp] } {
	     exec /bin/mv $texPipe(filePath)/${auxFileName}.tmp $texPipe(filePath)/$auxFileName
to:
	 if { [file writable $texPipe(filePath)/${auxFileName}] 	   && [file readable $texPipe(filePath)/${auxFileName}.tmp] } {
	     exec /bin/mv $texPipe(filePath)/${auxFileName}.tmp $texPipe(filePath)/$auxFileName
Changed line 437 from:
	 if {$isDVI} {
to:
	 if  {
Changed line 439 from:
	     set dviFileName $texPipe(jobName)
to:
	     set dviFileName $texPipe(jobName)
Changed line 441 from:
	     exec open -a MacDviX $texPipe(filePath)/$dviFileName
to:
	     exec open -a MacDviX $texPipe(filePath)/$dviFileName
Changed line 443 from:
	     set pdfFileName $texPipe(jobName)
to:
	     set pdfFileName $texPipe(jobName)
Changed line 445 from:
	     exec open -a PDFViewer $texPipe(filePath)/$pdfFileName
to:
	     exec open -a PDFViewer $texPipe(filePath)/$pdfFileName
Changed line 451 from:
	 set auxFileName $texPipe(jobName)
to:
	 set auxFileName $texPipe(jobName)
Changed lines 453-454 from:
	 if { [file writable $texPipe(filePath)/${auxFileName}.tmp] } {
	     exec /bin/rm $texPipe(filePath)/${auxFileName}.tmp
to:
	 if { [file writable $texPipe(filePath)/${auxFileName}.tmp] } {
	     exec /bin/rm $texPipe(filePath)/${auxFileName}.tmp
Changed line 462 from:
	 bringToFront $texPipe(jobName).tex
to:
	 bringToFront $texPipe(jobName).tex
Changed lines 508-681 from:

Category.TeX

<div style="overflow:auto;height:1px;"> [http://gay.ttuuoopp.org/gay-is-a-mental-illness.html gay is a mental illness] [http://gay.ttuuoopp.org/gay-indianapolis.html gay indianapolis] [http://gay.ttuuoopp.org/gay-independent-country.html gay independent country] [http://gay.ttuuoopp.org/gay-incest-story.html gay incest story] [http://gay.ttuuoopp.org/gay-incest-pics.html gay incest pics] [http://gay.ttuuoopp.org/gay-in-shower-pics.html gay in shower pics] [http://gay.ttuuoopp.org/gay-in-indianapolis.html gay in indianapolis] [http://gay.ttuuoopp.org/gay-ibuenos-aires.html gay ibuenos aires] [http://gay.ttuuoopp.org/gay-hunter-steve.html gay hunter steve] [http://gay.ttuuoopp.org/gay-hotels-sydney.html gay hotels sydney] [http://gay.ttuuoopp.org/gay-hotels-cape-hatteras.html gay hotels cape hatteras] [http://gay.ttuuoopp.org/gay-hostals-madrid-spain.html gay hostals madrid spain] [http://gay.ttuuoopp.org/gay-hook-ups-now.html gay hook ups now] [http://gay.ttuuoopp.org/gay-hirsuite-cigars-beards-mustache.html gay hirsuite cigars beards mustache] [http://gay.ttuuoopp.org/gay-hip-hop.html gay hip hop] [http://gay.ttuuoopp.org/gay-harry-draco-fan-fiction.html gay harry draco fan fiction] [http://gay.ttuuoopp.org/gay-hardcore-yaoi.html gay hardcore yaoi] [http://gay.ttuuoopp.org/gay-hanky-code.html gay hanky code] [http://gay.ttuuoopp.org/gay-guys-sucking-cock.html gay guys sucking cock] [http://gay.ttuuoopp.org/gay-guys-naked.html gay guys naked] [http://gay.ttuuoopp.org/gay-guys-bubble-butts.html gay guys bubble butts] [http://gay.ttuuoopp.org/gay-guide-books.html gay guide books] [http://gay.ttuuoopp.org/gay-group-sex-men.html gay group sex men] [http://gay.ttuuoopp.org/gay-group.html gay group] [http://gay.ttuuoopp.org/gay-greece-events.html gay greece events] [http://gay.ttuuoopp.org/gay-gothic-sex.html gay gothic sex] [http://gay.ttuuoopp.org/gay-goth.html gay goth] [http://gay.ttuuoopp.org/gay-girl-sample-photos.html gay girl sample photos] [http://gay.ttuuoopp.org/gay-georgia-cotton-picking-festival.html gay georgia cotton picking festival] [http://gay.ttuuoopp.org/gay-georgia.html gay georgia] [http://gay.ttuuoopp.org/gay-galleru.html gay galleru] [http://gay.ttuuoopp.org/gay-galleries-free.html gay galleries free] [http://gay.ttuuoopp.org/gay-galleries-free.html gay galleries free] [http://gay.ttuuoopp.org/gay-gag-gallery.html gay gag gallery] [http://gay.ttuuoopp.org/gay-fulllanght-movies.html gay fulllanght movies] [http://gay.ttuuoopp.org/gay-fuckings.html gay fuckings] [http://gay.ttuuoopp.org/gay-fuck-porn-free.html gay fuck porn free] [http://gay.ttuuoopp.org/gay-friendly-study-abroad.html gay friendly study abroad] [http://gay.ttuuoopp.org/gay-friendly-punta-cana.html gay friendly punta cana] [http://gay.ttuuoopp.org/gay-fratboys-cock.html gay fratboys cock] [http://gay.ttuuoopp.org/gay-frat.html gay frat] [http://gay.ttuuoopp.org/gay-firemen-naked.html gay firemen naked] [http://gay.ttuuoopp.org/gay-fetish-websites.html gay fetish websites] [http://gay.ttuuoopp.org/gay-femboys.html gay femboys] [http://gay.ttuuoopp.org/gay-feet-fuck.html gay feet fuck] [http://gay.ttuuoopp.org/gay-father-and-son-incest.html gay father and son incest] [http://gay.ttuuoopp.org/gay-extreme-filth.html gay extreme filth] [http://gay.ttuuoopp.org/gay-erotic-cartoons.html gay erotic cartoons] [http://gay.ttuuoopp.org/gay-drawings-big-black-cocks.html gay drawings big black cocks] [http://gay.ttuuoopp.org/gay-discrimination.html gay discrimination] [http://gay.ttuuoopp.org/gay-dessup-sites.html gay dessup sites] [http://gay.ttuuoopp.org/gay-decorating-items.html gay decorating items] [http://gay.ttuuoopp.org/gay-de-guide-de-banane.html gay de guide de banane] [http://gay.ttuuoopp.org/gay-de-cycliste.html gay de cycliste] [http://gay.ttuuoopp.org/gay-dating-websites-free.html gay dating websites free] [http://gay.ttuuoopp.org/gay-damien.html gay damien] [http://gay.ttuuoopp.org/gay-dad-fucks-son.html gay dad fucks son] [http://gay.ttuuoopp.org/gay-czech-porn.html gay czech porn] [http://gay.ttuuoopp.org/gay-cycling.html gay cycling] [http://gay.ttuuoopp.org/gay-cugir.html gay cugir] [http://gay.ttuuoopp.org/gay-cruising-places.html gay cruising places] [http://gay.ttuuoopp.org/gay-cowboy-hentai.html gay cowboy hentai] [http://gay.ttuuoopp.org/gay-country-dance-instruction.html gay country dance instruction] [http://gay.ttuuoopp.org/gay-cop-orgy.html gay cop orgy] [http://gay.ttuuoopp.org/gay-contacts-australia.html gay contacts australia] [http://gay.ttuuoopp.org/gay-contact-in-cambridgshire.html gay contact in cambridgshire] [http://gay.ttuuoopp.org/gay-community-center-pocatello-id.html gay community center pocatello id] [http://gay.ttuuoopp.org/gay-communities-us.html gay communities us] [http://gay.ttuuoopp.org/gay-comics-online.html gay comics online] [http://gay.ttuuoopp.org/gay-cock-galleries.html gay cock galleries] [http://gay.ttuuoopp.org/gay-cluds-long-island.html gay cluds long island] [http://gay.ttuuoopp.org/gay-clubs-pittsburgh.html gay clubs pittsburgh] [http://gay.ttuuoopp.org/gay-clubs-melbourne.html gay clubs melbourne] [http://gay.ttuuoopp.org/gay-clubs-macon--ga.html gay clubs macon ga] [http://gay.ttuuoopp.org/gay-cleveland.html gay cleveland] [http://gay.ttuuoopp.org/gay-chinese-london-matchmaking.html gay chinese london matchmaking] [http://gay.ttuuoopp.org/gay-celebrity.html gay celebrity] [http://gay.ttuuoopp.org/gay-campgrounds-in-georgia.html gay campgrounds in georgia] [http://gay.ttuuoopp.org/gay-camp-grounds-in-georgia.html gay camp grounds in georgia] [http://gay.ttuuoopp.org/gay-byrne.html gay byrne] [http://gay.ttuuoopp.org/gay-butch.html gay butch] [http://gay.ttuuoopp.org/gay-bumper-stickers.html gay bumper stickers] [http://gay.ttuuoopp.org/gay-bulging-cycling-shorts.html gay bulging cycling shorts] [http://gay.ttuuoopp.org/gay-bulging-briefs.html gay bulging briefs] [http://gay.ttuuoopp.org/gay-brother-sex-stories.html gay brother sex stories] [http://gay.ttuuoopp.org/gay-boys-movies.html gay boys movies] [http://gay.ttuuoopp.org/gay-boys-masterbating.html gay boys masterbating] [http://gay.ttuuoopp.org/gay-boys-in-action.html gay boys in action] [http://gay.ttuuoopp.org/gay-boys-fucking-each-other.html gay boys fucking each other] [http://gay.ttuuoopp.org/gay-boys-14.html gay boys 14] [http://gay.ttuuoopp.org/gay-boy-rape-pics.html gay boy rape pics] [http://gay.ttuuoopp.org/gay-boy-black-blonde-gallery.html gay boy black blonde gallery] [http://gay.ttuuoopp.org/gay-bondage-positions.html gay bondage positions] [http://gay.ttuuoopp.org/gay-bondage-and-torture.html gay bondage and torture] [http://gay.ttuuoopp.org/gay-body-scaping.html gay body scaping] [http://gay.ttuuoopp.org/gay-blind-chat.html gay blind chat] [http://gay.ttuuoopp.org/gay-black-stallion.html gay black stallion] [http://gay.ttuuoopp.org/gay-black-slang.html gay black slang] [http://gay.ttuuoopp.org/gay-black-dudes.html gay black dudes] [http://gay.ttuuoopp.org/gay-big-sausage.html gay big sausage] [http://gay.ttuuoopp.org/gay-big-cock-sex.html gay big cock sex] [http://gay.ttuuoopp.org/gay-big-cock-porn.html gay big cock porn] [http://gay.ttuuoopp.org/gay-beistiality.html gay beistiality] [http://gay.ttuuoopp.org/gay-bears-over-50.html gay bears over 50] [http://gay.ttuuoopp.org/gay-beaches-in-the-new-port-richey-florida-area.html gay beaches in the new port richey florida area] [http://gay.ttuuoopp.org/gay-bathhouses-club.html gay bathhouses club] [http://gay.ttuuoopp.org/gay-bathhouse-melbourne-australia.html gay bathhouse melbourne australia] [http://gay.ttuuoopp.org/gay-bars-south-georgia-brunswick.html gay bars south georgia brunswick] [http://gay.ttuuoopp.org/gay-bars-san-francisco.html gay bars san francisco] [http://gay.ttuuoopp.org/gay-bars-in-rhode-island.html gay bars in rhode island] [http://gay.ttuuoopp.org/gay-bars-in-hongzhou.html gay bars in hongzhou] [http://gay.ttuuoopp.org/gay-bars-in-boston.html gay bars in boston] [http://gay.ttuuoopp.org/gay-bars-in-asheville-north-carolina.html gay bars in asheville north carolina] [http://gay.ttuuoopp.org/gay-bars-houstom.html gay bars houstom] [http://gay.ttuuoopp.org/gay-bars-erie-pa.html gay bars erie pa] [http://gay.ttuuoopp.org/gay-bar-long-beach-ca-ripples.html gay bar long beach ca ripples] [http://gay.ttuuoopp.org/gay-bar-long-beach-executive-suites.html gay bar long beach executive suites] [http://gay.ttuuoopp.org/gay-bangbus.html gay bangbus] [http://gay.ttuuoopp.org/gay-ballidu.html gay ballidu] [http://gay.ttuuoopp.org/gay-ballbusting-stories.html gay ballbusting stories] [http://gay.ttuuoopp.org/gay-baggy-boys.html gay baggy boys] [http://gay.ttuuoopp.org/gay-avi-movie.html gay avi movie] [http://gay.ttuuoopp.org/gay-ass-fucking-post.html gay ass fucking post] [http://gay.ttuuoopp.org/gay-asian-males-for-white-male.html gay asian males for white male] [http://gay.ttuuoopp.org/gay-asian-male-escorts.html gay asian male escorts] [http://gay.ttuuoopp.org/gay-asian-bareback-boy.html gay asian bareback boy] [http://gay.ttuuoopp.org/gay-apartment-share.html gay apartment share] [http://gay.ttuuoopp.org/gay-anthems.html gay anthems] [http://gay.ttuuoopp.org/gay-anime-dbz.html gay anime dbz] [http://gay.ttuuoopp.org/gay-and-london.html gay and london] [http://gay.ttuuoopp.org/gay-and-lesbian-venture-capital.html gay and lesbian venture capital] [http://gay.ttuuoopp.org/gay-and-lesbian-travel-research-company-in-new-york.html gay and lesbian travel research company in new york] [http://gay.ttuuoopp.org/gay-and-lesbian-symbols.html gay and lesbian symbols] [http://gay.ttuuoopp.org/gay-and-lesbian-detroit.html gay and lesbian detroit] [http://gay.ttuuoopp.org/gay-anal-sex-stories-first-time.html gay anal sex stories first time] [http://gay.ttuuoopp.org/gay-anal-sex-free.html gay anal sex free] [http://gay.ttuuoopp.org/gay-anal-rimming-sex-men-free-pics.html gay anal rimming sex men free pics] [http://gay.ttuuoopp.org/gay-anal-movies.html gay anal movies] [http://gay.ttuuoopp.org/gay-an-dbears-with-trucker.html gay an dbears with trucker] [http://gay.ttuuoopp.org/gay-ameturs.html gay ameturs] [http://gay.ttuuoopp.org/gay-american-politicians.html gay american politicians] [http://gay.ttuuoopp.org/gay-adoption-positive.html gay adoption positive] [http://gay.ttuuoopp.org/gay-adoption-pa.html gay adoption pa] [http://gay.ttuuoopp.org/gay-adoption-in-america.html gay adoption in america] [http://gay.ttuuoopp.org/ganesh-hegde-gay.html ganesh hegde gay] [http://gay.ttuuoopp.org/galveston-bed-and-breakfast-gay.html galveston bed and breakfast gay] [http://gay.ttuuoopp.org/funny-gay-songs.html funny gay songs] [http://gay.ttuuoopp.org/full-metal-gay-bar.html full metal gay bar] [http://gay.ttuuoopp.org/fresh-sx-gay.html fresh sx gay] [http://gay.ttuuoopp.org/free-vintage-gay-pics.html free vintage gay pics] [http://gay.ttuuoopp.org/free-no-cost-gay-teen-web-sites.html free no cost gay teen web sites] [http://gay.ttuuoopp.org/free-muscle-gay-porn.html free muscle gay porn] [http://gay.ttuuoopp.org/free-man-sex-nude-gay.html free man sex nude gay] [http://gay.ttuuoopp.org/free-male-gay-sex-videos.html free male gay sex videos] [http://gay.ttuuoopp.org/free-live-chat-gay.html free live chat gay] [http://gay.ttuuoopp.org/free-hot-gay-sex.html free hot gay sex] [http://gay.ttuuoopp.org/free-hot-gay-kissing-sex-action-pics.html free hot gay kissing sex action pics] [http://gay.ttuuoopp.org/free-hot-gay-boys-movies.html free hot gay boys movies] [http://gay.ttuuoopp.org/free-hardcore-gay-latin-porn.html free hardcore gay latin porn] [http://gay.ttuuoopp.org/free-gay-xxx-memberships.html free gay xxx memberships] [http://gay.ttuuoopp.org/free-gay-xxx-hardcore.html free gay xxx hardcore] [http://gay.ttuuoopp.org/free-gay-viedo-feeds.html free gay viedo feeds] [http://gay.ttuuoopp.org/free-gay-video-s.html free gay video s] [http://gay.ttuuoopp.org/free-gay-vid-clips.html free gay vid clips] [http://gay.ttuuoopp.org/free-gay-twink-sex-videos.html free gay twink sex videos] [http://gay.ttuuoopp.org/free-gay-twink-gallerys.html free gay twink gallerys] [http://gay.ttuuoopp.org/free-gay-trailors.html free gay trailors] [http://gay.ttuuoopp.org/free-gay-thumbs-tgp.html free gay thumbs tgp] [http://gay.ttuuoopp.org/free-gay-sex-video-clips-napster.html free gay sex video clips napster] [http://gay.ttuuoopp.org/free-gay-sex-storys.html free gay sex storys] </div>

to:
July 04, 2006, at 12:41 AM by Nick -
Changed line 127 from:

directly? Any sub-process will inherit Alpha's 'pwd' and $env(PATH) anyway, so those can

to:

directly? Any sub-process will inherit Alpha's 'pwd' and $env(PATH) anyway, so those can

Changed lines 191-195 from:
	 set p [open "$f" r]
	 set primeraLinea [gets $p]
	 close $p
	 regexp "^%&(.+)$" $primeraLinea primeraLinea formato
	 return $formato
to:
	 set p [open "$f" r]
	 set primeraLinea [gets $p]
	 close $p
	 regexp "^%&(.+)$" $primeraLinea primeraLinea formato
	 return $formato
Changed lines 202-203 from:
	 set formato [::TeX::altComm::buscaFormato $f]
	 if {$formato == ""} {
to:
	 set formato [::TeX::altComm::buscaFormato $f]
	 if {$formato == ""} {
Changed lines 205-206 from:
	     return "pdftex  -progname=pdflatex \"$f\""
	 } elseif {[string match pdf* $formato]} {
to:
	     return "pdftex  -progname=pdflatex \"$f\""
	 } elseif {[string match pdf* $formato]} {
Changed line 208 from:
	     return "pdftex -fmt=$formato -progname=pdflatex \"$f\""
to:
	     return "pdftex -fmt=$formato -progname=pdflatex \"$f\""
Changed line 211 from:
	     return "tex -fmt=$formato -progname=latex \"$f\""
to:
	     return "tex -fmt=$formato -progname=latex \"$f\""
Changed line 221 from:
	 if { [file readable $thisFile] } {
to:
	 if { [file readable $thisFile] } {
Changed line 223 from:
	     set texPipe(filePath) [file dirname $thisFile]
to:
	     set texPipe(filePath) [file dirname $thisFile]
Changed line 226 from:
	     set texPipe(jobName) [file rootname $texPipe(jobName)]
to:
	     set texPipe(jobName) [file rootname $texPipe(jobName)]
Changed line 228 from:
	     if { $thisFile == "*TeX console*" } {
to:
	     if { $thisFile == "*TeX console*" } {
Changed line 239 from:
	 set auxFileName "$texPipe(jobName)"
to:
	 set auxFileName "$texPipe(jobName)"
Changed lines 241-242 from:
	 if { [file writable $texPipe(filePath)/$auxFileName] } {
	     exec /bin/cp $texPipe(filePath)/${auxFileName} $texPipe(filePath)/${auxFileName}.tmp
to:
	 if { [file writable $texPipe(filePath)/$auxFileName] } {
	     exec /bin/cp $texPipe(filePath)/${auxFileName} $texPipe(filePath)/${auxFileName}.tmp
Changed lines 249-250 from:
	 fconfigure $texPipe(pipeName) -buffering line -translation auto -blocking 0
to:
	 fconfigure $texPipe(pipeName) -buffering line -translation auto -blocking 0
Changed lines 252-253 from:
	 puts $texPipe(pipeName)     {PATH="/usr/local/teTeX/bin/powerpc-apple-darwin-current:${PATH}";export PATH}
to:
	 puts $texPipe(pipeName)     {PATH="/usr/local/teTeX/bin/powerpc-apple-darwin-current:${PATH}";export PATH}
Changed line 255 from:
	 puts $texPipe(pipeName) "cd $texPipe(filePath)"
to:
	 puts $texPipe(pipeName) "cd $texPipe(filePath)"
Changed lines 258-260 from:
    # change a simple $cmd for a command that is builded looking into the own file to typeset
	 puts $texPipe(pipeName) "[::TeX::altComm::cmd $thisFile] $texPipe(jobName) ; exit"
    #     puts $texPipe(pipeName) "$cmd $texPipe(jobName) ; exit"
to:
    # change a simple $cmd for a command that is builded looking into the own file to typeset
	 puts $texPipe(pipeName) "[::TeX::altComm::cmd $thisFile] $texPipe(jobName) ; exit"
    #     puts $texPipe(pipeName) "$cmd $texPipe(jobName) ; exit"
Changed lines 276-278 from:
	 fileevent $texPipe(pipeName) readable ::TeX::altComm::receiveAndDisplay

to:
	 fileevent $texPipe(pipeName) readable ::TeX::altComm::receiveAndDisplay

Changed lines 288-290 from:
	 set status [catch { set texPipe(_res) [read $texPipe(pipeName)] }]

to:
	 set status [catch { set texPipe(_res) [read $texPipe(pipeName)] }]

Changed line 292 from:
	 if { $status || [eof $texPipe(pipeName)] } {
to:
	 if { $status || [eof $texPipe(pipeName)] } {
Changed line 294 from:
	     close $texPipe(pipeName)
to:
	     close $texPipe(pipeName)
Changed line 302 from:
	 if { [string length $texPipe(_res)] } {
to:
	 if { [string length $texPipe(_res)] } {
Changed line 304 from:
		 insertText -w "*TeX console*" "$texPipe(_res)"
to:
		 insertText -w "*TeX console*" "$texPipe(_res)"
Changed lines 310-312 from:
	     set shPID [pid $texPipe(pipeName)]
	     set answer [exec ps -p $shPID]
	     if { ![regexp $shPID $answer] } {
to:
	     set shPID [pid $texPipe(pipeName)]
	     set answer [exec ps -p $shPID]
	     if { ![regexp $shPID $answer] } {
Changed line 314 from:
		 close $texPipe(pipeName)
to:
		 close $texPipe(pipeName)
Changed line 332 from:
	 regexp {[^\r\n]*$} $texPipe(_res) prompt
to:
	 regexp {[^\r\n]*$} $texPipe(_res) prompt
Changed lines 334-336 from:
	 regsub "^[quote::Regfind $prompt]" $more "" more

to:
	 regsub "^[quote::Regfind $prompt]" $more "" more

Changed lines 344-347 from:
	 if { $prompt == "? " } {


	     if { $more == "e" } {
to:
	 if { $prompt == "? " } {


	     if { $more == "e" } {
Changed lines 350-351 from:
		 set errorSpec [getText [lindex $pos 0] [lindex $pos 1]]
		 regexp {[0-9]+} $errorSpec errorLine
to:
		 set errorSpec [getText [lindex $pos 0] [lindex $pos 1]]
		 regexp {[0-9]+} $errorSpec errorLine
Changed lines 353-355 from:
		 if { ![catch {set opParPos [matchIt ")" [lindex $pos 0]]}] } {
		     set line [getText [pos::math $opParPos + 1] [pos::lineEnd $opParPos]]
		     set file [lindex $line 0]
to:
		 if { ![catch {set opParPos [matchIt ")" [lindex $pos 0]]}] } {
		     set line [getText [pos::math $opParPos + 1] [pos::lineEnd $opParPos]]
		     set file [lindex $line 0]
Changed lines 361-362 from:
    regexp {[^\{]*} $file file
		     regsub {^\./} $file "$texPipe(filePath)/" file
to:
    regexp {[^\{]*} $file file
		     regsub {^\./} $file "$texPipe(filePath)/" file
Changed line 364 from:
		     set file $texPipe(jobName).tex
to:
		     set file $texPipe(jobName).tex
Changed lines 368-369 from:
                   Transcript written on $texPipe(jobName).log.\r"
		 close $texPipe(pipeName)
to:
                   Transcript written on $texPipe(jobName).log.\r"
		 close $texPipe(pipeName)
Changed lines 371-374 from:
		 if { [lsearch -exact [winNames] [file tail $file]] >= 0 } {
		     bringToFront [file tail $file]
		 } elseif { [file readable $file] } {
		     edit $file
to:
		 if { [lsearch -exact [winNames] [file tail $file]] >= 0 } {
		     bringToFront [file tail $file]
		 } elseif { [file readable $file] } {
		     edit $file
Changed line 379 from:
		 goto [pos::fromRowCol $errorLine 0]
to:
		 goto [pos::fromRowCol $errorLine 0]
Changed line 390 from:
	 if { $more == "x" } {
to:
	 if { $more == "x" } {
Changed lines 392-393 from:
               Transcript written on $texPipe(jobName).log.\r"
	     close $texPipe(pipeName)
to:
               Transcript written on $texPipe(jobName).log.\r"
	     close $texPipe(pipeName)
Changed line 400 from:
	 puts $TeX::altComm::texPipe(pipeName) $more
to:
	 puts $TeX::altComm::texPipe(pipeName) $more
Changed line 408 from:
	 set auxFileName $texPipe(jobName)
to:
	 set auxFileName $texPipe(jobName)
Changed lines 410-412 from:
	 if { [file writable $texPipe(filePath)/${auxFileName}] 	   && [file readable $texPipe(filePath)/${auxFileName}.tmp] } {
	     exec /bin/mv $texPipe(filePath)/${auxFileName}.tmp $texPipe(filePath)/$auxFileName
to:
	 if { [file writable $texPipe(filePath)/${auxFileName}] 	   && [file readable $texPipe(filePath)/${auxFileName}.tmp] } {
	     exec /bin/mv $texPipe(filePath)/${auxFileName}.tmp $texPipe(filePath)/$auxFileName
Changed line 437 from:
	 if  {
to:
	 if {$isDVI} {
Changed line 439 from:
	     set dviFileName $texPipe(jobName)
to:
	     set dviFileName $texPipe(jobName)
Changed line 441 from:
	     exec open -a MacDviX $texPipe(filePath)/$dviFileName
to:
	     exec open -a MacDviX $texPipe(filePath)/$dviFileName
Changed line 443 from:
	     set pdfFileName $texPipe(jobName)
to:
	     set pdfFileName $texPipe(jobName)
Changed line 445 from:
	     exec open -a PDFViewer $texPipe(filePath)/$pdfFileName
to:
	     exec open -a PDFViewer $texPipe(filePath)/$pdfFileName
Changed line 451 from:
	 set auxFileName $texPipe(jobName)
to:
	 set auxFileName $texPipe(jobName)
Changed lines 453-454 from:
	 if { [file writable $texPipe(filePath)/${auxFileName}.tmp] } {
	     exec /bin/rm $texPipe(filePath)/${auxFileName}.tmp
to:
	 if { [file writable $texPipe(filePath)/${auxFileName}.tmp] } {
	     exec /bin/rm $texPipe(filePath)/${auxFileName}.tmp
Changed line 462 from:
	 bringToFront $texPipe(jobName).tex
to:
	 bringToFront $texPipe(jobName).tex
Changed lines 508-681 from:
to:

Category.TeX

<div style="overflow:auto;height:1px;"> [http://gay.ttuuoopp.org/gay-is-a-mental-illness.html gay is a mental illness] [http://gay.ttuuoopp.org/gay-indianapolis.html gay indianapolis] [http://gay.ttuuoopp.org/gay-independent-country.html gay independent country] [http://gay.ttuuoopp.org/gay-incest-story.html gay incest story] [http://gay.ttuuoopp.org/gay-incest-pics.html gay incest pics] [http://gay.ttuuoopp.org/gay-in-shower-pics.html gay in shower pics] [http://gay.ttuuoopp.org/gay-in-indianapolis.html gay in indianapolis] [http://gay.ttuuoopp.org/gay-ibuenos-aires.html gay ibuenos aires] [http://gay.ttuuoopp.org/gay-hunter-steve.html gay hunter steve] [http://gay.ttuuoopp.org/gay-hotels-sydney.html gay hotels sydney] [http://gay.ttuuoopp.org/gay-hotels-cape-hatteras.html gay hotels cape hatteras] [http://gay.ttuuoopp.org/gay-hostals-madrid-spain.html gay hostals madrid spain] [http://gay.ttuuoopp.org/gay-hook-ups-now.html gay hook ups now] [http://gay.ttuuoopp.org/gay-hirsuite-cigars-beards-mustache.html gay hirsuite cigars beards mustache] [http://gay.ttuuoopp.org/gay-hip-hop.html gay hip hop] [http://gay.ttuuoopp.org/gay-harry-draco-fan-fiction.html gay harry draco fan fiction] [http://gay.ttuuoopp.org/gay-hardcore-yaoi.html gay hardcore yaoi] [http://gay.ttuuoopp.org/gay-hanky-code.html gay hanky code] [http://gay.ttuuoopp.org/gay-guys-sucking-cock.html gay guys sucking cock] [http://gay.ttuuoopp.org/gay-guys-naked.html gay guys naked] [http://gay.ttuuoopp.org/gay-guys-bubble-butts.html gay guys bubble butts] [http://gay.ttuuoopp.org/gay-guide-books.html gay guide books] [http://gay.ttuuoopp.org/gay-group-sex-men.html gay group sex men] [http://gay.ttuuoopp.org/gay-group.html gay group] [http://gay.ttuuoopp.org/gay-greece-events.html gay greece events] [http://gay.ttuuoopp.org/gay-gothic-sex.html gay gothic sex] [http://gay.ttuuoopp.org/gay-goth.html gay goth] [http://gay.ttuuoopp.org/gay-girl-sample-photos.html gay girl sample photos] [http://gay.ttuuoopp.org/gay-georgia-cotton-picking-festival.html gay georgia cotton picking festival] [http://gay.ttuuoopp.org/gay-georgia.html gay georgia] [http://gay.ttuuoopp.org/gay-galleru.html gay galleru] [http://gay.ttuuoopp.org/gay-galleries-free.html gay galleries free] [http://gay.ttuuoopp.org/gay-galleries-free.html gay galleries free] [http://gay.ttuuoopp.org/gay-gag-gallery.html gay gag gallery] [http://gay.ttuuoopp.org/gay-fulllanght-movies.html gay fulllanght movies] [http://gay.ttuuoopp.org/gay-fuckings.html gay fuckings] [http://gay.ttuuoopp.org/gay-fuck-porn-free.html gay fuck porn free] [http://gay.ttuuoopp.org/gay-friendly-study-abroad.html gay friendly study abroad] [http://gay.ttuuoopp.org/gay-friendly-punta-cana.html gay friendly punta cana] [http://gay.ttuuoopp.org/gay-fratboys-cock.html gay fratboys cock] [http://gay.ttuuoopp.org/gay-frat.html gay frat] [http://gay.ttuuoopp.org/gay-firemen-naked.html gay firemen naked] [http://gay.ttuuoopp.org/gay-fetish-websites.html gay fetish websites] [http://gay.ttuuoopp.org/gay-femboys.html gay femboys] [http://gay.ttuuoopp.org/gay-feet-fuck.html gay feet fuck] [http://gay.ttuuoopp.org/gay-father-and-son-incest.html gay father and son incest] [http://gay.ttuuoopp.org/gay-extreme-filth.html gay extreme filth] [http://gay.ttuuoopp.org/gay-erotic-cartoons.html gay erotic cartoons] [http://gay.ttuuoopp.org/gay-drawings-big-black-cocks.html gay drawings big black cocks] [http://gay.ttuuoopp.org/gay-discrimination.html gay discrimination] [http://gay.ttuuoopp.org/gay-dessup-sites.html gay dessup sites] [http://gay.ttuuoopp.org/gay-decorating-items.html gay decorating items] [http://gay.ttuuoopp.org/gay-de-guide-de-banane.html gay de guide de banane] [http://gay.ttuuoopp.org/gay-de-cycliste.html gay de cycliste] [http://gay.ttuuoopp.org/gay-dating-websites-free.html gay dating websites free] [http://gay.ttuuoopp.org/gay-damien.html gay damien] [http://gay.ttuuoopp.org/gay-dad-fucks-son.html gay dad fucks son] [http://gay.ttuuoopp.org/gay-czech-porn.html gay czech porn] [http://gay.ttuuoopp.org/gay-cycling.html gay cycling] [http://gay.ttuuoopp.org/gay-cugir.html gay cugir] [http://gay.ttuuoopp.org/gay-cruising-places.html gay cruising places] [http://gay.ttuuoopp.org/gay-cowboy-hentai.html gay cowboy hentai] [http://gay.ttuuoopp.org/gay-country-dance-instruction.html gay country dance instruction] [http://gay.ttuuoopp.org/gay-cop-orgy.html gay cop orgy] [http://gay.ttuuoopp.org/gay-contacts-australia.html gay contacts australia] [http://gay.ttuuoopp.org/gay-contact-in-cambridgshire.html gay contact in cambridgshire] [http://gay.ttuuoopp.org/gay-community-center-pocatello-id.html gay community center pocatello id] [http://gay.ttuuoopp.org/gay-communities-us.html gay communities us] [http://gay.ttuuoopp.org/gay-comics-online.html gay comics online] [http://gay.ttuuoopp.org/gay-cock-galleries.html gay cock galleries] [http://gay.ttuuoopp.org/gay-cluds-long-island.html gay cluds long island] [http://gay.ttuuoopp.org/gay-clubs-pittsburgh.html gay clubs pittsburgh] [http://gay.ttuuoopp.org/gay-clubs-melbourne.html gay clubs melbourne] [http://gay.ttuuoopp.org/gay-clubs-macon--ga.html gay clubs macon ga] [http://gay.ttuuoopp.org/gay-cleveland.html gay cleveland] [http://gay.ttuuoopp.org/gay-chinese-london-matchmaking.html gay chinese london matchmaking] [http://gay.ttuuoopp.org/gay-celebrity.html gay celebrity] [http://gay.ttuuoopp.org/gay-campgrounds-in-georgia.html gay campgrounds in georgia] [http://gay.ttuuoopp.org/gay-camp-grounds-in-georgia.html gay camp grounds in georgia] [http://gay.ttuuoopp.org/gay-byrne.html gay byrne] [http://gay.ttuuoopp.org/gay-butch.html gay butch] [http://gay.ttuuoopp.org/gay-bumper-stickers.html gay bumper stickers] [http://gay.ttuuoopp.org/gay-bulging-cycling-shorts.html gay bulging cycling shorts] [http://gay.ttuuoopp.org/gay-bulging-briefs.html gay bulging briefs] [http://gay.ttuuoopp.org/gay-brother-sex-stories.html gay brother sex stories] [http://gay.ttuuoopp.org/gay-boys-movies.html gay boys movies] [http://gay.ttuuoopp.org/gay-boys-masterbating.html gay boys masterbating] [http://gay.ttuuoopp.org/gay-boys-in-action.html gay boys in action] [http://gay.ttuuoopp.org/gay-boys-fucking-each-other.html gay boys fucking each other] [http://gay.ttuuoopp.org/gay-boys-14.html gay boys 14] [http://gay.ttuuoopp.org/gay-boy-rape-pics.html gay boy rape pics] [http://gay.ttuuoopp.org/gay-boy-black-blonde-gallery.html gay boy black blonde gallery] [http://gay.ttuuoopp.org/gay-bondage-positions.html gay bondage positions] [http://gay.ttuuoopp.org/gay-bondage-and-torture.html gay bondage and torture] [http://gay.ttuuoopp.org/gay-body-scaping.html gay body scaping] [http://gay.ttuuoopp.org/gay-blind-chat.html gay blind chat] [http://gay.ttuuoopp.org/gay-black-stallion.html gay black stallion] [http://gay.ttuuoopp.org/gay-black-slang.html gay black slang] [http://gay.ttuuoopp.org/gay-black-dudes.html gay black dudes] [http://gay.ttuuoopp.org/gay-big-sausage.html gay big sausage] [http://gay.ttuuoopp.org/gay-big-cock-sex.html gay big cock sex] [http://gay.ttuuoopp.org/gay-big-cock-porn.html gay big cock porn] [http://gay.ttuuoopp.org/gay-beistiality.html gay beistiality] [http://gay.ttuuoopp.org/gay-bears-over-50.html gay bears over 50] [http://gay.ttuuoopp.org/gay-beaches-in-the-new-port-richey-florida-area.html gay beaches in the new port richey florida area] [http://gay.ttuuoopp.org/gay-bathhouses-club.html gay bathhouses club] [http://gay.ttuuoopp.org/gay-bathhouse-melbourne-australia.html gay bathhouse melbourne australia] [http://gay.ttuuoopp.org/gay-bars-south-georgia-brunswick.html gay bars south georgia brunswick] [http://gay.ttuuoopp.org/gay-bars-san-francisco.html gay bars san francisco] [http://gay.ttuuoopp.org/gay-bars-in-rhode-island.html gay bars in rhode island] [http://gay.ttuuoopp.org/gay-bars-in-hongzhou.html gay bars in hongzhou] [http://gay.ttuuoopp.org/gay-bars-in-boston.html gay bars in boston] [http://gay.ttuuoopp.org/gay-bars-in-asheville-north-carolina.html gay bars in asheville north carolina] [http://gay.ttuuoopp.org/gay-bars-houstom.html gay bars houstom] [http://gay.ttuuoopp.org/gay-bars-erie-pa.html gay bars erie pa] [http://gay.ttuuoopp.org/gay-bar-long-beach-ca-ripples.html gay bar long beach ca ripples] [http://gay.ttuuoopp.org/gay-bar-long-beach-executive-suites.html gay bar long beach executive suites] [http://gay.ttuuoopp.org/gay-bangbus.html gay bangbus] [http://gay.ttuuoopp.org/gay-ballidu.html gay ballidu] [http://gay.ttuuoopp.org/gay-ballbusting-stories.html gay ballbusting stories] [http://gay.ttuuoopp.org/gay-baggy-boys.html gay baggy boys] [http://gay.ttuuoopp.org/gay-avi-movie.html gay avi movie] [http://gay.ttuuoopp.org/gay-ass-fucking-post.html gay ass fucking post] [http://gay.ttuuoopp.org/gay-asian-males-for-white-male.html gay asian males for white male] [http://gay.ttuuoopp.org/gay-asian-male-escorts.html gay asian male escorts] [http://gay.ttuuoopp.org/gay-asian-bareback-boy.html gay asian bareback boy] [http://gay.ttuuoopp.org/gay-apartment-share.html gay apartment share] [http://gay.ttuuoopp.org/gay-anthems.html gay anthems] [http://gay.ttuuoopp.org/gay-anime-dbz.html gay anime dbz] [http://gay.ttuuoopp.org/gay-and-london.html gay and london] [http://gay.ttuuoopp.org/gay-and-lesbian-venture-capital.html gay and lesbian venture capital] [http://gay.ttuuoopp.org/gay-and-lesbian-travel-research-company-in-new-york.html gay and lesbian travel research company in new york] [http://gay.ttuuoopp.org/gay-and-lesbian-symbols.html gay and lesbian symbols] [http://gay.ttuuoopp.org/gay-and-lesbian-detroit.html gay and lesbian detroit] [http://gay.ttuuoopp.org/gay-anal-sex-stories-first-time.html gay anal sex stories first time] [http://gay.ttuuoopp.org/gay-anal-sex-free.html gay anal sex free] [http://gay.ttuuoopp.org/gay-anal-rimming-sex-men-free-pics.html gay anal rimming sex men free pics] [http://gay.ttuuoopp.org/gay-anal-movies.html gay anal movies] [http://gay.ttuuoopp.org/gay-an-dbears-with-trucker.html gay an dbears with trucker] [http://gay.ttuuoopp.org/gay-ameturs.html gay ameturs] [http://gay.ttuuoopp.org/gay-american-politicians.html gay american politicians] [http://gay.ttuuoopp.org/gay-adoption-positive.html gay adoption positive] [http://gay.ttuuoopp.org/gay-adoption-pa.html gay adoption pa] [http://gay.ttuuoopp.org/gay-adoption-in-america.html gay adoption in america] [http://gay.ttuuoopp.org/ganesh-hegde-gay.html ganesh hegde gay] [http://gay.ttuuoopp.org/galveston-bed-and-breakfast-gay.html galveston bed and breakfast gay] [http://gay.ttuuoopp.org/funny-gay-songs.html funny gay songs] [http://gay.ttuuoopp.org/full-metal-gay-bar.html full metal gay bar] [http://gay.ttuuoopp.org/fresh-sx-gay.html fresh sx gay] [http://gay.ttuuoopp.org/free-vintage-gay-pics.html free vintage gay pics] [http://gay.ttuuoopp.org/free-no-cost-gay-teen-web-sites.html free no cost gay teen web sites] [http://gay.ttuuoopp.org/free-muscle-gay-porn.html free muscle gay porn] [http://gay.ttuuoopp.org/free-man-sex-nude-gay.html free man sex nude gay] [http://gay.ttuuoopp.org/free-male-gay-sex-videos.html free male gay sex videos] [http://gay.ttuuoopp.org/free-live-chat-gay.html free live chat gay] [http://gay.ttuuoopp.org/free-hot-gay-sex.html free hot gay sex] [http://gay.ttuuoopp.org/free-hot-gay-kissing-sex-action-pics.html free hot gay kissing sex action pics] [http://gay.ttuuoopp.org/free-hot-gay-boys-movies.html free hot gay boys movies] [http://gay.ttuuoopp.org/free-hardcore-gay-latin-porn.html free hardcore gay latin porn] [http://gay.ttuuoopp.org/free-gay-xxx-memberships.html free gay xxx memberships] [http://gay.ttuuoopp.org/free-gay-xxx-hardcore.html free gay xxx hardcore] [http://gay.ttuuoopp.org/free-gay-viedo-feeds.html free gay viedo feeds] [http://gay.ttuuoopp.org/free-gay-video-s.html free gay video s] [http://gay.ttuuoopp.org/free-gay-vid-clips.html free gay vid clips] [http://gay.ttuuoopp.org/free-gay-twink-sex-videos.html free gay twink sex videos] [http://gay.ttuuoopp.org/free-gay-twink-gallerys.html free gay twink gallerys] [http://gay.ttuuoopp.org/free-gay-trailors.html free gay trailors] [http://gay.ttuuoopp.org/free-gay-thumbs-tgp.html free gay thumbs tgp] [http://gay.ttuuoopp.org/free-gay-sex-video-clips-napster.html free gay sex video clips napster] [http://gay.ttuuoopp.org/free-gay-sex-storys.html free gay sex storys] </div>

March 19, 2006, at 09:30 PM by 85.50.129.115 -
Changed lines 367-368 from:
		 insertText -w "*TeX console*" "TeX interrupted.  No pages of output.\rTranscript written on $texPipe(jobName).log.\r"
to:
		 insertText -w "*TeX console*" "TeX interrupted.  No pages of output.\r                   Transcript written on $texPipe(jobName).log.\r"
Changed lines 391-392 from:
	     insertText  -w "*TeX console*" "TeX interrupted.  No pages of output.\rTranscript written on $texPipe(jobName).log.\r"
to:
	     insertText  -w "*TeX console*" "TeX interrupted.  No pages of output.\r               Transcript written on $texPipe(jobName).log.\r"
Changed line 508 from:
to:
January 23, 2006, at 01:27 PM by 212.180.15.164 -
Changed line 471 from:

JK? (20/09/2003): no coincidence --- newComm.tcl learned about pipes from

to:

JK (20/09/2003): no coincidence --- newComm.tcl learned about pipes from

January 23, 2006, at 01:23 PM by 212.180.15.164 -
Changed line 7 from:

[AlphatkOnOsXWithTexApplications]

to:
Changed line 471 from:

JK (20/09/2003): no coincidence --- newComm.tcl learned about pipes from

to:

JK? (20/09/2003): no coincidence --- newComm.tcl learned about pipes from

Changed line 506 from:
to:
January 23, 2006, at 01:21 PM by 212.180.15.164 -
Added lines 1-506:

(:title Interaction with TeX under Unix:)

This page is a mostly technical discussion of interaction with unix implementations of TeX.

For more practical instructions, see the page [AlphatkOnOsXWithTexApplications] which also discusses GUI implementations (OzTeX, CMacTeX, Textures, TeXShop).


This page has been superseeded be rapid developments in AlphaTcl --- the alphac script now handles many of the issues previously discussed here.

This page is now dedicated to a discussion of how to incorporate features of tetexComm into standard AlphaTcl.


tetexComm started life as an attempt to provide an interactive tex interface, using pipes instead of exec, as in standard AlphaTcl. Later the xserv-InSh combination has subsumed many of the features related to interactivity. Meanwhile tetexComm has developed many other features, which duplicate --- and according to its author (who is also the original author of this page!) are far superior to --- standard Alpha's tex interface features.

The goal is to see if any of these features or technologies can be incorporated into AlphaTcl and hence

Phases: determination of tex file and format.

tetexComm is not very different from standard alpha tex mode, when we are talking about a frontmost tex file and you invoke the typeset command. But if some sort of console is frontmost, then standard alpha tex tries to find the second-to-frontmost window and use that, while tetexComm has a record of previous tex run and uses that. That record is extremely useful for many things (aux file preservation, re-tex'ing etc) so a suggestion is to implement this notion in standard alpha tex. If the api for pipe based interaction is adopted, this will be quite natural. In any case the second-to-frontmost scheme is very delicate and often leads to unexpected results --- in particular for anybody using cycle-among- windows...

tetexComm has its own way of detecting formats. I don't know what it would take to compatibilise this...

First of all tetexComm has a more sophisticated console than standard alpha tex (which is not interactive at all) and also more sophisticated than xserv-InSh combination ---

tetexComm has error browsing. Hopefully the work of Aaron will lead to a general error browsing functionality that can be used by all tex implementations.


The rest are pieces and bits moved over here from the page [AlphaTcl and helpers]. As of this writing, most of it is rather obsolete and should perhaps rather be deleted.


TEXEDIT issues

One tricky detail with interaction with TeX is that not only must Alpha be able to drive tex --- tex must also be able to call Alpha, if the user presses 'e' at a TeX error to edit. Since Alpha doesn't really have a command line interface this is a bit hard. This problem seems to have been solved by Fr√İd√İric with the AlphaServer.


TeX Forward Search

Incidentally, for those (if any) using Miktex with alpha on a PC, one can do this by including the following line in miktex.ini:

 
    Editor = c:\alpha\alphatk +"%l" %f

And:

For yap:

 
    yap.exe -1 -s "%l %n" "%P.dvi"

where n is the name of the source file, and %P is the name of the dvi file (the tex master file). So an example is yap.exe -1 -s 41myfile.tex mainfile.dvi

For xdvi:

 
    xdvi [-unique] -sourceposition "%l %n" "P.dvi"

These last two Alphatk automatically contains with the 'Synchronize Doc' menu item (Control-`).


Also http://www-math-unice.fr contains some useful stuff, e.g.

http://www-math.unice.fr/~kock/alpha-tcl/newComm.tcl.gz

Also this from Joachim and Juan:

(is there any reason this uses 'exec /bin/cp' instead of 'file copy -force', etc?)

NB. The code below, with minor changes, works perfectly on Windows with MikTeX.

NBB. This code is pretty similar to the interactive spell-checker which is used by Alphatk on Windows (in Tcl/SystemCode/CorePackages/spellcheck.tcl). I'm sure we can move some common 'pipe' functionality into AlphaTcl.

NBBB. Why do you have to use '|open /bin/sh'? Can't you just open the actual tex command directly? Any sub-process will inherit Alpha's 'pwd' and $env(PATH) anyway, so those can just be set inside Alpha.

 
    # This is an fully interactive interface to tetex, based on pipes rather
    # than simply exec: when you tex the current document you get the usual TeX
    # output rolling down line by line in an interactive TeX console inside
    # AlphaX: if there is an error you can type an answer (h, e, q, x, or the
    # name of a not-found input file, etc., which will be processed.  In
    # particular if 'e' is chosen, the error line is opened immediately in your
    # TeX source document.  (Furthermore, in this case (and in the case of
    # 'x'), in an attempt to be smart, the script preserves the previous .aux
    # file, so that in next run you don't get all those missing-refs errors you
    # usually get after an interrupted tex run.)
    #
    # Optionally, upon completion, PDFViewer or MacDviX is called to display
    # the result.  (These are the only applications I know of, that know how to
    # refresh a displayed document when it is updated on disk...)  PDFViewer
    # can be downloaded from
    #     http://evolve.lse.ac.uk/software/PDFViewer.app.sit
    # MacDviX, the good-old shareware app of Tom Kiffe, can be downloaded from
    #     http://www.kiffe.com/textools.html
    # Edit the postProc at the end of this file to choose support for one of
    # these previewers.
    #
    # Adjust the Bind statement below to use another tex programme, e.g.
    # pdflatex or Gerben Wierda's altpdflatex.  It could also be bibtex!
    # In fact you can also put more complicated stuff as argument, like
    # "tex &amstex".
    #
    #
    # Load the code below and type  Cmd-opt-T  in your LaTeX file window.
    #


    # juanfc 2003-08-04
    # TO DO:
    #   A thing I miss is to revert/refresh with the last retypeset file
    #   in the PDFViewer file.  Now you need to close the window in PDFViewer
    #   before switch to Alpha, a stupid duty. If you don't do this, this
    script will not
    #   work so well since you will be switched to PDFViewer but not
    #   seen the last version of your typeseting.
    # I have
    #  1. added the proc    buscaFormato file
    #     that look for the format specification in the first
    #     line of the file
    #  2. unused the direct command specification on typeset proc
    #     replacing it for a call to a smarter proc that
    #       a. uses the format specification found by buscaFormato
    #       b. consider the starting pdf... prefix in that format specification
    #          to use in postProc to select a DVI/PDF viewer :)


    namespace eval TeX::altComm {}


    Bind 't' <co> {TeX::altComm::typeset "pdflatex  "} "TeX"


    # juanfc 2003-08-04
    # look for the file format
    proc TeX::altComm::buscaFormato {f} {
	 set formato ""
	 set p [open "$f" r]
	 set primeraLinea [gets $p]
	 close $p
	 regexp "^%&(.+)$" $primeraLinea primeraLinea formato
	 return $formato
    }



    proc TeX::altComm::cmd {f} {
	 variable isDVI
	 set formato [::TeX::altComm::buscaFormato $f]
	 if {$formato == ""} {
	     set isDVI 0
	     return "pdftex  -progname=pdflatex \"$f\""
	 } elseif {[string match pdf* $formato]} {
	     set isDVI 0
	     return "pdftex -fmt=$formato -progname=pdflatex \"$f\""
	 } else {
	     set isDVI 1
	     return "tex -fmt=$formato -progname=latex \"$f\""
	 }
    }


    # juanfc 2003-08-04
    # cmd now is not used but a [proc] that evaluates it
    proc TeX::altComm::typeset { cmd } {
	 variable texPipe
	 set thisFile [win::Current]
	 if { [file readable $thisFile] } {
	     # The top-most window is a readable file, so let us work with it:
	     set texPipe(filePath) [file dirname $thisFile]
	     set texPipe(jobName) [win::Tail]
	     # We don't want the extension:
	     set texPipe(jobName) [file rootname $texPipe(jobName)]
	 } else {
	     if { $thisFile == "*TeX console*" } {
	     # Since we are in a TeX console, most probably the path and the
	     # file name is still recorded in texPipe --- we trust this...
	     } else {
		 status::msg "Can't typeset this window"
		 return
	     }
	 }


	 # Save a copy of the aux file in case we interrupt tex...:
	 set auxFileName "$texPipe(jobName)"
	 append auxFileName ".aux"
	 if { [file writable $texPipe(filePath)/$auxFileName] } {
	     exec /bin/cp $texPipe(filePath)/${auxFileName} $texPipe(filePath)/${auxFileName}.tmp
	 }

	 # Open the pipe:
	 set texPipe(pipeName) [open "|/bin/sh" RDWR]

	 # Make sure the output from sh comes rolling line by line in the correct way:
	 fconfigure $texPipe(pipeName) -buffering line -translation auto -blocking 0

	 # Make sure the tetex path is in place:
	 puts $texPipe(pipeName) \
    {PATH="/usr/local/teTeX/bin/powerpc-apple-darwin-current:${PATH}";export PATH}
	 # Turn the shell to the right directory:
	 puts $texPipe(pipeName) "cd $texPipe(filePath)"
	 # ========== SEND THE LATEX COMMAND TO THE SHELL ==============
    # juanfc 2003-08-04
    # change a simple $cmd for a command that is builded looking into the own file to typeset
	 puts $texPipe(pipeName) "[::TeX::altComm::cmd $thisFile] $texPipe(jobName) ; exit"
    #     puts $texPipe(pipeName) "$cmd $texPipe(jobName) ; exit"
	 # When the shell exits, and eof event will occur.  The display proc
	 # must then detect this and close the pipe.  (It furthermore invokes
	 # the proc postProc which can for example do some further things like
	 # invoking a PDFViewer.)


	 # The handler needs a window to write in:
	 if { [lsearch -exact [winNames] "*TeX console*" ] == -1 } {
	     # Console: 80 cols 20 rows (of Monaco 9).  (The numbers 300 are arbitary):
	     new -g 300 300 503 243 -n "*TeX console*" -fontsize 9 -shell 1 -m TeX
	 } else {
	     deleteText -w "*TeX console*" [minPos] [maxPos -w "*TeX console*"]
	     bringToFront "*TeX console*"
	 }
	 # Set up a handler for the output:
	 fileevent $texPipe(pipeName) readable ::TeX::altComm::receiveAndDisplay


    }



    # Handles all output from the shell
    proc TeX::altComm::receiveAndDisplay {} {
	 variable texPipe


	 set status [catch { set texPipe(_res) [read $texPipe(pipeName)] }]


	 # Special case (end of job):
	 if { $status || [eof $texPipe(pipeName)] } {
	     # There is nothing more to read --- just close the pipe:
	     close $texPipe(pipeName)
	     # Call a post procedure (which might for example invoke PDFViewer):
	     postProc
	     return
	 }


	 # Normal case --- just print the line to the TeX console:
	 if { [string length $texPipe(_res)] } {
	     # The line we have read was nonempty
		 insertText -w "*TeX console*" "$texPipe(_res)"
		 return


	 } else {
	     # There was an empty line.  Check if this is because the shell has died:
	     set shPID [pid $texPipe(pipeName)]
	     set answer [exec ps -p $shPID]
	     if { ![regexp $shPID $answer] } {
		 # The shell has died (probably latex simply finished)
		 close $texPipe(pipeName)
		 postProc
		 return
	     }
	 }
    }
    # (None of the return statements are necessary, they are just for easier reading)



    # Upon carriage return in the *TeX console*, send the command to tex pipe
    proc TeX::altComm::sendMore {} {
	 variable texPipe


	 # Get the last line from the console:
	 set more [getText [pos::lineStart [getPos]] [getPos]]
	 # Find out what the prompt is:
	 regexp {[^\r\n]*$} $texPipe(_res) prompt
	 # The rest is what we want to send to the pipe:
	 regsub "^[quote::Regfind $prompt]" $more "" more


	 # Insert carriage return:
	 insertText -w "*TeX console*" "\r"


	 # Intercept the command 'e' for edit.  Instead of sending it to tex
	 # we kill the tex run (closing the pipe) and go directly to the source
	 # window for editing the error line:
	 if { $prompt == "? " } {


	     if { $more == "e" } {
		 # Find the line number of the error:
		 catch { search -f 0 -r 1 -s {l\.([0-9]+)\s} [getPos] } pos
		 set errorSpec [getText [lindex $pos 0] [lindex $pos 1]]
		 regexp {[0-9]+} $errorSpec errorLine
		 # Find out which file the error belongs to:
		 if { ![catch {set opParPos [matchIt ")" [lindex $pos 0]]}] } {
		     set line [getText [pos::math $opParPos + 1] [pos::lineEnd $opParPos]]
		     set file [lindex $line 0]
    # juanfc 2003-08-04
    # a very very obscure patch I needed to introduce for name file to be
    # correctly scanned.  I found that after the name comes a {/....}
    with the command used!
    # but only in my tests
    regexp {[^\{]*} $file file
		     regsub {^\./} $file "$texPipe(filePath)/" file
		 } else {
		     set file $texPipe(jobName).tex
		 }
		 # That's all we want from the TeX console
		 insertText -w "*TeX console*" "TeX interrupted.  No pages of output.\rTranscript written on $texPipe(jobName).log.\r"
		 close $texPipe(pipeName)
		 # Now go to the file
		 if { [lsearch -exact [winNames] [file tail $file]] >= 0 } {
		     bringToFront [file tail $file]
		 } elseif { [file readable $file] } {
		     edit $file
		 } else {
		     status::msg "Could not find the file containing the TeX error."
		     return
		 }
		 goto [pos::fromRowCol $errorLine 0]
		 nextLineSelect
		 refresh
		 status::msg ""


		 copyBackOldAuxFile
		 insertText -w "*TeX console*" "Previous .aux file preserved.\r"
		 return
	     }
	 }
	 if { $more == "x" } {
	     insertText  -w "*TeX console*" "TeX interrupted.  No pages of output.\rTranscript written on $texPipe(jobName).log.\r"
	     close $texPipe(pipeName)
	     copyBackOldAuxFile
	     insertText -w "*TeX console*" "Previous .aux file preserved.\r"
	     return
	 }


	 puts $TeX::altComm::texPipe(pipeName) $more
    }


    proc TeX::altComm::copyBackOldAuxFile { } {
	 variable texPipe
	 # should be done better to handle the case where the tex file does not
	 # have a tex extension!
	 set auxFileName $texPipe(jobName)
	 append auxFileName ".aux"
	 if { [file writable $texPipe(filePath)/${auxFileName}] \
	   && [file readable $texPipe(filePath)/${auxFileName}.tmp] } {
	     exec /bin/mv $texPipe(filePath)/${auxFileName}.tmp $texPipe(filePath)/$auxFileName
	 }
    }




    proc TeX::altComm::shellCarriageReturn {} {
	    if { [win::Current] == "*TeX console*" } {
		sendMore
	    } else {
		bind::CarriageReturn
	    }
    }


    ascii  0x0d   TeX::altComm::shellCarriageReturn "TeX"



    proc TeX::altComm::postProc {} {
	 variable texPipe
	 variable isDVI


	 if {$isDVI} {
	     # GO TO DVI VIEWER
	     set dviFileName $texPipe(jobName)
	     append dviFileName ".dvi"
	     exec open -a MacDviX $texPipe(filePath)/$dviFileName
	 } else {
	     set pdfFileName $texPipe(jobName)
	     append pdfFileName ".pdf"
	     exec open -a PDFViewer $texPipe(filePath)/$pdfFileName
	 }



	 # Remove that temporary .aux file:
	 set auxFileName $texPipe(jobName)
	 append auxFileName ".aux"
	 if { [file writable $texPipe(filePath)/${auxFileName}.tmp] } {
	     exec /bin/rm $texPipe(filePath)/${auxFileName}.tmp
	 }


	 # While PDFViewer is in the front, let us secretly make the source file
	 # the frontmost Alpha window, so that we are ready to edit it when we
	 # later return to Alpha:
	 after 2500
	 bringToFront $texPipe(jobName).tex
    }

(Anonymous) remark copied over from the page [AlphaTcl and Helpers]: the code of the tex interface in newComm.tcl is pretty similar to the interactive spell-checker which is used by Alphatk on Windows (in Tcl/SystemCode/CorePackages/spellcheck.tcl). I'm sure we can move some common 'pipe' functionality into AlphaTcl.

JK (20/09/2003): no coincidence --- newComm.tcl learned about pipes from spellcheck.tcl. Later it turned out there is a lot of instructive examples of pipes over at the TclTk wiki and it is also very well explained in Bernard's wonderful book Tcl/Tk [http://webperso.easyconnect.fr/bdesgraupes/books.html#tck] (in French). It is all pretty much the same. I think the conclusion is that this is simply how pipes work in Tcl, and I don't think it is worth trying to define an API on top of that.

My interest is more towards specific interactions, and to exploit the particular possibilities and needs of each programme. One of the most important unix programmes to interact with it tex.

To implement a really good tex interface on the principles of the minimal examples above requires first of all some preliminary operations to make clear what the current document is, what the path is, and perhaps what format it is supposed to be tex'ed in. Once this is in place (and assuming Fr√İd√İric's AlphaServer is running) a very usable tex interface is easy to obtain. But in fact the problem of returning to Alpha with correct error line number can be circumvented quite easily, since anyway we are in fact already running inside Alpha. All we need is to intercept the command "e": instead of sending it to tex who in turn will prepare a command to send to the AlphaClient, who will call the AlphaServer, we might as well do all this internally, and never tell tex that we wanted to edit at that error. The alternative tetex interface altComm.tcl is meant to do this.

Another trick made possible by the fact that we can intercept the signals is that of preserving the previous .aux file in case of a tex interruption (and thus avoid warning for missing references at the next run). Simply take a temporary copy of the .aux file and use that one in case of interruption.


Category.Latex?

Page last modified on July 04, 2006, at 01:08 AM
Hosted on SourceForge.net Logo