Change to horizontal scrolling to allow the assumed document width to be set.

1 files changed, 11 insertions, 0 deletions

diff --git a/src/Editor.cxx b/src/Editor.cxx
index 57856dc37..4e430b0d7 100644
--- a/src/Editor.cxx
+++ b/src/Editor.cxx
@@ -326,6 +326,7 @@ Editor::Editor() {
 	xOffset = 0;
 	xCaretMargin = 50;
 	horizontalScrollBarVisible = true;
+	scrollWidth = 2000;
 
 	pixmapLine = Surface::Allocate();
 	pixmapSelMargin = Surface::Allocate();
@@ -4668,6 +4669,16 @@ sptr_t Editor::WndProc(unsigned int iMessage, uptr_t wParam, sptr_t lParam) {
 	case SCI_GETLAYOUTCACHE:
 		return llc.GetLevel();
 
+	case SCI_SETSCROLLWIDTH:
+		PLATFORM_ASSERT(wParam > 0);
+		if (wParam > 0)
+			scrollWidth = wParam;
+		SetScrollBars();
+		break;
+
+	case SCI_GETSCROLLWIDTH:
+		return scrollWidth;
+
 	case SCI_GETCOLUMN:
 		return pdoc->GetColumn(wParam);