------------------------------------------------------

-- Path to Clipboard tool script
-- Gets the path of an LD or SV and copies it to the clipboard.  Useful if you want to set the path of an LD to that of an existing SV, or to add a clip from a SV or LD to a bin.
-- Jan 6, 2009
-- 
--
-- place in Fusion:/Scripts/Tool/AT
--
-- Written by Chad Capeland (ccapeland[GO-AWAY-SPAMBOT!]@anatomicaltravel.com)
-- Copyright (c) 2008 Anatomical Travelogue LLC 
-- (http://www.anatomicaltravel.com/research)
--
-- The authors hereby grant permission to use, copy, and distribute this
-- software and its documentation for any purpose, provided that existing
-- copyright notices are retained in all copies and that this notice is
-- included verbatim in any distributions. Additionally, the authors grant
-- permission to modify this software and its documentation for any
-- purpose, provided that such modifications are not distributed without
-- the explicit consent of the authors and that existing copyright notices
-- are retained in all copies. 

-- IN NO EVENT SHALL THE AUTHORS OR DISTRIBUTORS BE LIABLE TO ANY PARTY FOR
-- DIRECT, INDIRECT, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES ARISING
-- OUT OF THE USE OF THIS SOFTWARE, ITS DOCUMENTATION, OR ANY DERIVATIVES
-- THEREOF, EVEN IF THE AUTHORS HAVE BEEN ADVISED OF THE POSSIBILITY OF
-- SUCH DAMAGE. 
 
-- THE AUTHORS AND DISTRIBUTORS SPECIFICALLY DISCLAIM ANY WARRANTIES,
-- INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
-- MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, AND NON-INFRINGEMENT.
-- THIS SOFTWARE IS PROVIDED ON AN "AS IS" BASIS, AND THE AUTHORS AND
-- DISTRIBUTORS HAVE NO OBLIGATION TO PROVIDE MAINTENANCE, SUPPORT,
-- UPDATES, ENHANCEMENTS, OR MODIFICATIONS. 
------------------------------------------------------

-- Yes, the script is shorter than the comments, but I'm trying to be consistant.
------------------------------------------------------

if tool.Clip then
	path = tool.Clip[comp.CurrentTime]
	path = comp:MapPath(path)
	eyeon.setclipboard(path)
end