From 6d01db3ef4ca2101086a6b0a7c18133d7638d3d5 Mon Sep 17 00:00:00 2001 From: Tim Date: Fri, 21 Apr 2023 07:17:37 +0200 Subject: [PATCH] =?UTF-8?q?Lib=20eingeh=C3=A4ngt?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- configs/autohotkey/NewTxt.ahk | 13 ++----------- 1 file changed, 2 insertions(+), 11 deletions(-) diff --git a/configs/autohotkey/NewTxt.ahk b/configs/autohotkey/NewTxt.ahk index 9dcc182..bf473a8 100644 --- a/configs/autohotkey/NewTxt.ahk +++ b/configs/autohotkey/NewTxt.ahk @@ -1,5 +1,7 @@ #Requires AutoHotkey v2.0 +#Include Lib.ahk #NoTrayIcon + ;Mit Strg, Shift + M wird ein leeres Textfile erzeugt. #HotIf ("ahk_class CabinetWClass") ^+m:: @@ -11,17 +13,6 @@ } #HotIf -;Ermittelt den aktuellen Pfad -GetPath(_hwnd) -{ - for w in ComObject("Shell.Application").Windows - if (w.hwnd = _hwnd) - { - path := StrReplace(w.LocationURL, "file:///") - return StrReplace(path, "%20", " ") - } -} - ;Schreibt die Datei CreateFile(path) {