From 2ffc5af90180e0bbf09359bfde77780e4e26715b Mon Sep 17 00:00:00 2001
From: nyamatongwe <unknown>
Date: Thu, 4 Apr 2002 07:45:59 +0000
Subject: Change to horizontal scrolling to allow the assumed document width to
 be set.

---
 src/Editor.cxx | 11 +++++++++++
 1 file changed, 11 insertions(+)

(limited to 'src/Editor.cxx')

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);
 
-- 
cgit v1.2.3