diff --git a/libs/ardour/luabindings.cc b/libs/ardour/luabindings.cc
index 80f8e06f3d..0f13feae57 100644
--- a/libs/ardour/luabindings.cc
+++ b/libs/ardour/luabindings.cc
@@ -2615,6 +2615,7 @@ LuaBindings::common (lua_State* L)
 		.addConst ("IsAutoLoop", ARDOUR::Location::Flags(Location::IsAutoLoop))
 		.addConst ("IsHidden", ARDOUR::Location::Flags(Location::IsHidden))
 		.addConst ("IsCDMarker", ARDOUR::Location::Flags(Location::IsCDMarker))
+		.addConst ("IsCueMarker", ARDOUR::Location::Flags(Location::IsCueMarker))
 		.addConst ("IsRangeMarker", ARDOUR::Location::Flags(Location::IsRangeMarker))
 		.addConst ("IsSessionRange", ARDOUR::Location::Flags(Location::IsSessionRange))
 		.addConst ("IsSkip", ARDOUR::Location::Flags(Location::IsSkip))
diff --git a/share/scripts/add_cdmarker.lua b/share/scripts/add_cdmarker.lua
index fb12a9e7a3..2a47a9f3d8 100644
--- a/share/scripts/add_cdmarker.lua
+++ b/share/scripts/add_cdmarker.lua
@@ -2,6 +2,6 @@ ardour { ["type"] = "EditorAction", name = "Add CD marker" }
 function 
 factory () 
 	return function () 
-		Editor:mouse_add_new_marker (Session:transport_sample(), true)
+		Editor:mouse_add_new_marker (Session:transport_sample(), Location.IsCDMarker)
 	end 
 end