Skip to content

Commit

Permalink
Rename scheme menu "Office VBA" to "VBA / VB 6.0" since they have sam…
Browse files Browse the repository at this point in the history 
…e syntax.
  • Loading branch information
@zufuliu
zufuliu committed Nov 11, 2024
1 parent 3ab14bc commit 97b091b
Show file tree
Hide file tree
Showing 12 changed files with 26 additions and 24 deletions.
8 changes: 5 additions & 3 deletions doc/FileExt.txt
View file
Original file line number Diff line number Diff line change
Expand Up @@ -588,13 +588,15 @@ Vim Script

Visual Basic
vb
bas VBA Source Code File

https://learn.microsoft.com/en-us/previous-versions/visualstudio/visual-basic-6/aa241721(v=vs.60)
bas Visual Basic Module
frm Visual Basic Text Form
cls Program Class File
ctl Visual Basic User Control Object File
pag Visual Basic Property Page
pag Visual Basic Property Page File
dsr Visual Basic Active Designer File
dob Visual Basic User Document
dob ActiveX Document Form File


WebAssembly
Expand Down
4 changes: 2 additions & 2 deletions locale/de/Notepad4.rc
View file
Original file line number Diff line number Diff line change
Expand Up @@ -554,8 +554,8 @@ BEGIN
//POPUP "S&QL Dialect"
POPUP "&Visual Basic"
BEGIN
MENUITEM "&Visual Basic", IDM_LEXER_VBNET
MENUITEM "&Office VBA", IDM_LEXER_VBA
MENUITEM "Visual &Basic", IDM_LEXER_VBNET
MENUITEM "&VBA / VB 6.0", IDM_LEXER_VBA
MENUITEM "VB&Script", IDM_LEXER_VBS
END
POPUP "&XML Dokument"
Expand Down
4 changes: 2 additions & 2 deletions locale/fr/Notepad4.rc
View file
Original file line number Diff line number Diff line change
Expand Up @@ -554,8 +554,8 @@ BEGIN
//POPUP "Langage SQL"
POPUP "&Visual Basic"
BEGIN
MENUITEM "&Visual Basic", IDM_LEXER_VBNET
MENUITEM "&Office VBA", IDM_LEXER_VBA
MENUITEM "Visual &Basic", IDM_LEXER_VBNET
MENUITEM "&VBA / VB 6.0", IDM_LEXER_VBA
MENUITEM "VB&Script", IDM_LEXER_VBS
END
POPUP "Document XML"
Expand Down
4 changes: 2 additions & 2 deletions locale/it/Notepad4.rc
View file
Original file line number Diff line number Diff line change
Expand Up @@ -554,8 +554,8 @@ BEGIN
//POPUP "S&QL Dialect"
POPUP "&Visual Basic"
BEGIN
MENUITEM "&Visual Basic", IDM_LEXER_VBNET
MENUITEM "&Office VBA", IDM_LEXER_VBA
MENUITEM "Visual &Basic", IDM_LEXER_VBNET
MENUITEM "&VBA / VB 6.0", IDM_LEXER_VBA
MENUITEM "VB&Script", IDM_LEXER_VBS
END
POPUP "Documento &XML"
Expand Down
4 changes: 2 additions & 2 deletions locale/ja/Notepad4.rc
View file
Original file line number Diff line number Diff line change
Expand Up @@ -554,8 +554,8 @@ BEGIN
//POPUP "S&QL Dialect"
POPUP "&Visual Basic"
BEGIN
MENUITEM "&Visual Basic", IDM_LEXER_VBNET
MENUITEM "&Office VBA", IDM_LEXER_VBA
MENUITEM "Visual &Basic", IDM_LEXER_VBNET
MENUITEM "&VBA / VB 6.0", IDM_LEXER_VBA
MENUITEM "VB&Script", IDM_LEXER_VBS
END
POPUP "XML文書(&X)"
Expand Down
4 changes: 2 additions & 2 deletions locale/ko/Notepad4.rc
View file
Original file line number Diff line number Diff line change
Expand Up @@ -554,8 +554,8 @@ BEGIN
//POPUP "SQL 방언(&Q)"
POPUP "&Visual Basic"
BEGIN
MENUITEM "&Visual Basic", IDM_LEXER_VBNET
MENUITEM "&Office VBA", IDM_LEXER_VBA
MENUITEM "Visual &Basic", IDM_LEXER_VBNET
MENUITEM "&VBA / VB 6.0", IDM_LEXER_VBA
MENUITEM "VB&Script", IDM_LEXER_VBS
END
POPUP "XML 문서(&X)"
Expand Down
4 changes: 2 additions & 2 deletions locale/pt-BR/Notepad4.rc
View file
Original file line number Diff line number Diff line change
Expand Up @@ -554,8 +554,8 @@ BEGIN
//POPUP "S&QL Dialect"
POPUP "&Visual Basic"
BEGIN
MENUITEM "&Visual Basic", IDM_LEXER_VBNET
MENUITEM "&Office VBA", IDM_LEXER_VBA
MENUITEM "Visual &Basic", IDM_LEXER_VBNET
MENUITEM "&VBA / VB 6.0", IDM_LEXER_VBA
MENUITEM "VB&Script", IDM_LEXER_VBS
END
POPUP "&XML Document"
Expand Down
4 changes: 2 additions & 2 deletions locale/ru/Notepad4.rc
View file
Original file line number Diff line number Diff line change
Expand Up @@ -555,8 +555,8 @@ BEGIN
//POPUP "S&QL Dialect"
POPUP "&Visual Basic"
BEGIN
MENUITEM "&Visual Basic", IDM_LEXER_VBNET
MENUITEM "&Office VBA", IDM_LEXER_VBA
MENUITEM "Visual &Basic", IDM_LEXER_VBNET
MENUITEM "&VBA / VB 6.0", IDM_LEXER_VBA
MENUITEM "VB&Script", IDM_LEXER_VBS
END
POPUP "&XML-документ"
Expand Down
4 changes: 2 additions & 2 deletions locale/zh-Hans/Notepad4.rc
View file
Original file line number Diff line number Diff line change
Expand Up @@ -554,8 +554,8 @@ BEGIN
//POPUP "S&QL Dialect"
POPUP "&Visual Basic"
BEGIN
MENUITEM "&Visual Basic", IDM_LEXER_VBNET
MENUITEM "&Office VBA", IDM_LEXER_VBA
MENUITEM "Visual &Basic", IDM_LEXER_VBNET
MENUITEM "&VBA / VB 6.0", IDM_LEXER_VBA
MENUITEM "VB&Script", IDM_LEXER_VBS
END
POPUP "&XML 文档"
Expand Down
4 changes: 2 additions & 2 deletions locale/zh-Hant/Notepad4.rc
View file
Original file line number Diff line number Diff line change
Expand Up @@ -554,8 +554,8 @@ BEGIN
//POPUP "S&QL Dialect"
POPUP "&Visual Basic"
BEGIN
MENUITEM "&Visual Basic", IDM_LEXER_VBNET
MENUITEM "&Office VBA", IDM_LEXER_VBA
MENUITEM "Visual &Basic", IDM_LEXER_VBNET
MENUITEM "&VBA / VB 6.0", IDM_LEXER_VBA
MENUITEM "VB&Script", IDM_LEXER_VBS
END
POPUP "&XML 文件"
Expand Down
4 changes: 2 additions & 2 deletions src/Notepad4.rc
View file
Original file line number Diff line number Diff line change
Expand Up @@ -554,8 +554,8 @@ BEGIN
//POPUP "S&QL Dialect"
POPUP "&Visual Basic"
BEGIN
MENUITEM "&Visual Basic", IDM_LEXER_VBNET
MENUITEM "&Office VBA", IDM_LEXER_VBA
MENUITEM "Visual &Basic", IDM_LEXER_VBNET
MENUITEM "&VBA / VB 6.0", IDM_LEXER_VBA
MENUITEM "VB&Script", IDM_LEXER_VBS
END
POPUP "&XML Document"
Expand Down
2 changes: 1 addition & 1 deletion src/Styles.cpp
View file
Original file line number Diff line number Diff line change
Expand Up @@ -2437,7 +2437,7 @@ static void Style_UpdateLexerLang(LPCEDITLEXER pLex, LPCWSTR lpszExt, LPCWSTR lp
break;

case NP2LEX_VISUALBASIC:
if (StrCaseEqual(L"bas", lpszExt)) {
if (lstrlen(lpszExt) == 3) {
np2LexLangIndex = IDM_LEXER_VBA;
}
break;
Expand Down

0 comments on commit 97b091b

Please sign in to comment.