hashirama/metabrush
1
0
Fork 0
mirror of https://gitlab.com/sheaf/metabrush.git synced 2024-11-05 14:53:37 +00:00
Code Issues Actions Projects Releases Wiki Activity

pen + brush mode = no op

Browse source
This commit is contained in:
sheaf 2024-10-21 10:43:13 +02:00
parent 6a9dca211a
commit 71f42894f8
2 changed files with 46 additions and 47 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
src/app/MetaBrush/Application/Action.hs
View file

@ -1034,7 +1034,10 @@ instance HandleAction MouseClick where
_ -> do _ -> do
STM.writeTVar mouseHoldTVar ( Just $ SelectionHold pos ) STM.writeTVar mouseHoldTVar ( Just $ SelectionHold pos )
pure Don'tModifyDoc pure Don'tModifyDoc
Pen -> do Pen -> case mode of
BrushMode -> pure Don'tModifyDoc
MetaMode -> pure Don'tModifyDoc
PathMode -> do
-- Pen tool in path mode: start or continue a drawing operation. -- Pen tool in path mode: start or continue a drawing operation.
mbPartialPath <- STM.readTVar partialPathTVar mbPartialPath <- STM.readTVar partialPathTVar
mbSelBrush <- STM.readTVar selectedBrushTVar mbSelBrush <- STM.readTVar selectedBrushTVar

4
src/metabrushes/MetaBrush/Action.hs
View file

@ -119,10 +119,6 @@ import MetaBrush.Stroke
import MetaBrush.Unique import MetaBrush.Unique
( Unique ) ( Unique )
import Debug.Utils
( trace )
-------------------------------------------------------------------------------- --------------------------------------------------------------------------------
-- Subdivision. -- Subdivision.