# HG changeset patch
# User greg
# Date 1511800152 18000
# Node ID de98a1b0be8b2f8a59f62a274815952d4330319d
# Parent  4c42188478a7761cae0ec694137faf9b52517339
Uploaded

diff -r 4c42188478a7 -r de98a1b0be8b ideas_genome_tracks.R
--- a/ideas_genome_tracks.R	Mon Nov 27 11:15:22 2017 -0500
+++ b/ideas_genome_tracks.R	Mon Nov 27 11:29:12 2017 -0500
@@ -203,12 +203,12 @@
 write.table(contents, file=genomes_file_path, quote=F, row.names=F, col.names=F);
 
 # Create the tracks.
-tracks_dir <- paste(hub_dir, "/", "tracks", "/", sep="");
+tracks_dir <- paste(hub_dir, opt$build, "/", sep="");
 dir.create(tracks_dir, showWarnings=FALSE);
 track_db <- create_track_db(opt$input_dir_state, opt$chrom_len_file, tracks_dir, opt$hub_name, opt$short_label, opt$long_label, track_color);
 
 # Create the trackDb.txt output.
-track_db_file_path <- paste(hub_dir, "trackDb.txt", sep="");
+track_db_file_path <- paste(tracks_dir, "trackDb.txt", sep="");
 write.table(track_db, file=track_db_file_path, quote=F, row.names=F, col.names=F);
 
 # Create the primary HTML dataset.