diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,5 +1,9 @@
 # Revision history for pms-domain-model
 
+## 0.1.4.0 -- 2026-01-31
+
+* Add file system make-directory tools.
+
 ## 0.1.3.0 -- 2025-12-31
 
 * Add file system tools.
diff --git a/pms-domain-model.cabal b/pms-domain-model.cabal
--- a/pms-domain-model.cabal
+++ b/pms-domain-model.cabal
@@ -20,7 +20,7 @@
 -- PVP summary:     +-+------- breaking API changes
 --                  | | +----- non-breaking API additions
 --                  | | | +--- code changes with no API change
-version:            0.1.3.0
+version:            0.1.4.0
 
 -- A short (one-line) description of the package.
 synopsis:           pms-domain-model
diff --git a/src/PMS/Domain/Model/DM/Type.hs b/src/PMS/Domain/Model/DM/Type.hs
--- a/src/PMS/Domain/Model/DM/Type.hs
+++ b/src/PMS/Domain/Model/DM/Type.hs
@@ -522,7 +522,7 @@
 instance Default McpInitializeResponseResultServerInfo where
   def = McpInitializeResponseResultServerInfo {
         _nameMcpInitializeResponseResultServerInfo = "pty-mcp-server"
-      , _versionMcpInitializeResponseResultServerInfo = "0.0.4"
+      , _versionMcpInitializeResponseResultServerInfo = "0.1.6.0"
       }
 
 -- |
@@ -1174,6 +1174,26 @@
 
 -- |
 --
+data ListDirFileSystemCommandData =
+  ListDirFileSystemCommandData {
+    _jsonrpcListDirFileSystemCommandData   :: JsonRpcRequest
+  , _argumentsListDirFileSystemCommandData :: RawJsonByteString
+  } deriving (Show, Read, Eq)
+
+makeLenses ''ListDirFileSystemCommandData
+
+-- |
+--
+data MakeDirFileSystemCommandData =
+  MakeDirFileSystemCommandData {
+    _jsonrpcMakeDirFileSystemCommandData   :: JsonRpcRequest
+  , _argumentsMakeDirFileSystemCommandData :: RawJsonByteString
+  } deriving (Show, Read, Eq)
+
+makeLenses ''MakeDirFileSystemCommandData
+
+-- |
+--
 data WriteFileFileSystemCommandData =
   WriteFileFileSystemCommandData {
     _jsonrpcWriteFileFileSystemCommandData   :: JsonRpcRequest
@@ -1194,19 +1214,10 @@
 
 -- |
 --
-data ListDirFileSystemCommandData =
-  ListDirFileSystemCommandData {
-    _jsonrpcListDirFileSystemCommandData   :: JsonRpcRequest
-  , _argumentsListDirFileSystemCommandData :: RawJsonByteString
-  } deriving (Show, Read, Eq)
-
-makeLenses ''ListDirFileSystemCommandData
-
--- |
---
 data FileSystemCommand =
     EchoFileSystemCommand EchoFileSystemCommandData
   | ListDirFileSystemCommand ListDirFileSystemCommandData
+  | MakeDirFileSystemCommand MakeDirFileSystemCommandData
   | ReadFileFileSystemCommand ReadFileFileSystemCommandData
   | WriteFileFileSystemCommand WriteFileFileSystemCommandData
   deriving (Show, Read, Eq)
@@ -1216,6 +1227,7 @@
 getJsonRpcFileSystemCommand :: FileSystemCommand -> JsonRpcRequest
 getJsonRpcFileSystemCommand (EchoFileSystemCommand d)      = d^.jsonrpcEchoFileSystemCommandData
 getJsonRpcFileSystemCommand (ListDirFileSystemCommand d)   = d^.jsonrpcListDirFileSystemCommandData
+getJsonRpcFileSystemCommand (MakeDirFileSystemCommand d)   = d^.jsonrpcMakeDirFileSystemCommandData
 getJsonRpcFileSystemCommand (ReadFileFileSystemCommand d)  = d^.jsonrpcReadFileFileSystemCommandData
 getJsonRpcFileSystemCommand (WriteFileFileSystemCommand d) = d^.jsonrpcWriteFileFileSystemCommandData
 
