-- Dieter May <dm at mayart.de>, 2006
-- Tastenbefehl dafŸr definieren.

tell application "Adobe InDesign CS5"
	--activate
	try
		set d to active document
		
		set h to horizontal measurement units of view preferences of d as text
		set v to vertical measurement units of view preferences of d as text
		if h & v is not "pointspoints" then
			set vertical measurement units of view preferences of d to points
			set horizontal measurement units of view preferences of d to points
		else
			set vertical measurement units of view preferences of d to millimeters
			set horizontal measurement units of view preferences of d to millimeters
		end if
		
	end try
end tell