diff --git a/changes/22.0.3.md b/changes/22.0.3.md
index 4bac496c4..58dd12262 100644
--- a/changes/22.0.3.md
+++ b/changes/22.0.3.md
@@ -1,3 +1,5 @@
 * Add characters:
   - SCRIPT CAPITAL P (`U+2118`) (#1668).
+  - LATIN CAPITAL LETTER L WITH DOUBLE BAR (`U+2C60`) (#1659).
+  - LATIN SMALL LETTER L WITH DOUBLE BAR (`U+2C61`) (#1659).
 * Fix shape of LATIN CAPITAL LETTER SMALL CAPITAL I (`U+A7AE`).
diff --git a/font-src/glyphs/letter/latin/upper-l.ptl b/font-src/glyphs/letter/latin/upper-l.ptl
index 551176755..996263e28 100644
--- a/font-src/glyphs/letter/latin/upper-l.ptl
+++ b/font-src/glyphs/letter/latin/upper-l.ptl
@@ -104,10 +104,16 @@ glyph-block Letter-Latin-Upper-L : begin
 
 	create-glyph 'LBarOverlay'
 		LetterBarOverlay.l.in [LBarLeftX : DivFrame 1] 0 CAP
+	create-glyph 'LDoubleBarOverlay' : composite-proc
+		LetterBarOverlay.l.in [LBarLeftX : DivFrame 1] 0 CAP (py -- 0.6)
+		LetterBarOverlay.l.in [LBarLeftX : DivFrame 1] 0 CAP (py -- 0.4)
+
 	create-glyph 'LBeltOverlay'
 		BeltOverlay CAP ([LBarLeftX : DivFrame 1] + 0.5 * HVContrast * Stroke)
 	create-glyph 'smcpLBeltOverlay'
 		BeltOverlay XH ([LBarLeftX : DivFrame 1] + 0.5 * HVContrast * Stroke)
+
 	derive-composites 'LBar' 0x23D 'L' 'LBarOverlay'
+	derive-composites 'LDoubleBar' 0x2C60 'L' 'LDoubleBarOverlay'
 	derive-composites 'LBelt' 0xA7AD 'L' 'LBeltOverlay'
 	derive-composites 'smcpLBelt' 0x1DF04 'smcpL' 'smcpLBeltOverlay'
diff --git a/font-src/glyphs/letter/shared.ptl b/font-src/glyphs/letter/shared.ptl
index 7817e9a63..e65cb79ac 100644
--- a/font-src/glyphs/letter/shared.ptl
+++ b/font-src/glyphs/letter/shared.ptl
@@ -855,12 +855,13 @@ glyph-block Letter-Shared-Shapes : begin
 			local xLeftEdge  : x - pXInSw * refSw * HVContrast
 			local xRightEdge : x + (1 - pXInSw) * refSw * HVContrast
 			local p : (xLeftEdge - xLeftSpace) / ((xRightSpace - xRightEdge) + (xLeftEdge - xLeftSpace))
-			local xC : mix xLeftEdge xRightEdge (1 - p)
+			local xC : mix xLeftEdge xRightEdge [mix 0.5 (1 - p) 0.5]
+			local jut : 0.75 * LongJut
 			return : HOverlayBar
 				Math.min (xLeftEdge - SideJut)
-					Math.max (xC - 0.75 * LongJut) [mix xLeftSpace xLeftEdge 0.3]
+					Math.max (xC - jut) [mix xLeftSpace xLeftEdge 0.3]
 				Math.max (xRightEdge + SideJut)
-					Math.min [mix xRightSpace xRightEdge 0.3] (xC + 0.75 * LongJut)
+					Math.min [mix xRightSpace xRightEdge 0.3] (xC + jut)
 				begin y
 				begin sw
 
diff --git a/font-src/glyphs/marks/overlay.ptl b/font-src/glyphs/marks/overlay.ptl
index 4c0d7fe5d..fe0e9e5d6 100644
--- a/font-src/glyphs/marks/overlay.ptl
+++ b/font-src/glyphs/marks/overlay.ptl
@@ -74,6 +74,13 @@ glyph-block Mark-Overlay : begin
 		set-mark-anchor 'overlay' markMiddle (XH / 2) markMiddle (XH / 2)
 		include : HOverlayBar (markMiddle - LongJut * 0.75) (markMiddle + LongJut * 0.75) (XH / 2)
 
+	create-glyph 'dblBarOver' : glyph-proc
+		set-width 0
+		set-mark-anchor 'overlay' markMiddle (XH / 2) markMiddle (XH / 2)
+		local gap : 0.2 * CAP
+		include : HOverlayBar (markMiddle - LongJut * 0.75) (markMiddle + LongJut * 0.75) (XH / 2 + 0.5 * gap)
+		include : HOverlayBar (markMiddle - LongJut * 0.75) (markMiddle + LongJut * 0.75) (XH / 2 - 0.5 * gap)
+
 	create-glyph 'longBarOver' 0xE001 : glyph-proc
 		set-width 0
 		set-mark-anchor 'overlay' markMiddle (XH / 2) markMiddle (XH / 2)
diff --git a/font-src/meta/unicode-knowledge.ptl b/font-src/meta/unicode-knowledge.ptl
index 4a006d4f8..6cd852659 100644
--- a/font-src/meta/unicode-knowledge.ptl
+++ b/font-src/meta/unicode-knowledge.ptl
@@ -140,6 +140,7 @@ export : define decompOverrides : object
 	0x1EE2 { 'OHorn' 'dotBelow' }
 	0x1EE3 { 'oHorn' 'dotBelow' }
 
+	0x2c61 { 'l' 'dblBarOver' }
 	0x2c65 { 'a' 'slashOver' }
 	0x2c66 { 't' 'longSlashOver' }