docs: function _shrink_wrap(elt_id){
  
      // Now take what we have, and wrap around some expansion code if
      // it looks like it is too long.
      var _trim_hash = {};
      var _trimit = 100;
      // Only want to compile once.
      var ea_regexp = new RegExp("\<\/a\>", "i"); // detect an <a>
      var br_regexp = new RegExp("\<br\ \/\>", "i"); // detect a <br />
  
      function _trim_and_store( in_str ){
  	
  	var retval = in_str;
  
  	// Let there be tests.
  	var list_p = br_regexp.test(retval);
  	var anchors_p = ea_regexp.test(retval);
  	
  	// Try and break without breaking anchors, etc.
  	var tease = null;
  	if( ! anchors_p && ! list_p ){
  	    // A normal string then...trim it!
  	    //ll("\tT&S: easy normal text, go nuts!");
  	    tease = new html.span(bbop.crop(retval, _trimit, '...'),
  				  {'generate_id': true});
  	}else if( anchors_p && ! list_p ){
  	    // It looks like it is a link without a break, so not
  	    // a list. We cannot trim this safely.
  	    //ll("\tT&S: single link so cannot work on!");
  	}else{
  	    //ll("\tT&S: we have a list to deal with");
  	    
  	    var new_str_list = retval.split(br_regexp);
  	    if( new_str_list.length <= 3 ){
  		// Let's just ignore lists that are only three
  		// items.
  		//ll("\tT&S: pass thru list length <= 3");
  	    }else{
  		//ll("\tT&S: contruct into 2 plus tag");
  		var new_str = '';
  		new_str = new_str + new_str_list.shift();
  		new_str = new_str + '<br />';
  		new_str = new_str + new_str_list.shift();
  		tease = new html.span(new_str, {'generate_id': true});
  	    }
  	}
  	
  	// If we have a tease (able to break down incoming string),
  	// assemble the rest of the packet to create the UI.
  	if( tease ){
  	    // Setup the text for tease and full versions.
  	    var bgen = function(lbl, dsc){
  		var b = new html.button(lbl, {
  		    'generate_id': true,
  		    'type': 'button',
  		    'title': dsc || lbl,
  		    //'class': 'btn btn-default btn-xs'
  		    'class': 'btn btn-primary btn-xs'
  		});
  		return b;
  	    };
  	    var more_b = new bgen('more', 'Display the complete list');
  	    var full = new html.span(retval, {'generate_id': true});
  	    var less_b = new bgen('less', 'Display the truncated list');
  	    
  	    // Store the different parts for later activation.
  	    var tease_id = tease.get_id();
  	    var more_b_id = more_b.get_id();
  	    var full_id = full.get_id();
  	    var less_b_id = less_b.get_id();
  	    _trim_hash[tease_id] = [tease_id, more_b_id, full_id, less_b_id];
  	    
  	    // New final string.
  	    retval = tease.to_string() + " " +
  		more_b.to_string() + " " +
  		full.to_string() + " " +
  		less_b.to_string();
  	}
  	
  	return retval;
      }
  
      var pre_html = jQuery('#' + elt_id).html();
      if( pre_html && pre_html.length && (pre_html.length > _trimit * 2) ){
  
  	// Get the new value into the wild.
  	var new_str = _trim_and_store(pre_html);
  	if( new_str !== pre_html ){
  	    jQuery('#' + elt_id).html(new_str);  
  
  	    // Bind the jQuery events to it.
  	    // Add the roll-up/down events to the doc.
  	    us.each(_trim_hash, function(val, key){
      		var tease_id = val[0];
      		var more_b_id = val[1];
      		var full_id = val[2];
      		var less_b_id = val[3];
  		
      		// Initial state.
      		jQuery('#' + full_id ).hide();
      		jQuery('#' + less_b_id ).hide();
  		
      		// Click actions to go back and forth.
      		jQuery('#' + more_b_id ).click(function(){
      		    jQuery('#' + tease_id ).hide();
      		    jQuery('#' + more_b_id ).hide();
      		    jQuery('#' + full_id ).show('fast');
      		    jQuery('#' + less_b_id ).show('fast');
      		});
      		jQuery('#' + less_b_id ).click(function(){
      		    jQuery('#' + full_id ).hide();
      		    jQuery('#' + less_b_id ).hide();
      		    jQuery('#' + tease_id ).show('fast');
      		    jQuery('#' + more_b_id ).show('fast');
      		});
  	    });    
  	}
      }
  }