View source for Delete dir only if empty

{{PageAuthor|camillo}}

<div style="border: 1px solid #808040; background-color:#f8f880; color:#000; padding:0.3em;"><b>Warning: </b>RMDir without the /r switch will only delete empty directories, no extra code is required.</div>


== Description ==
Here is a simple but useful function to delete a directory ONLY if it is empty.

''' You can now delete empty directories by simply using RMDir without the /r switch.

== How To Use ==
Put directory in $0 and call the function.

== Example ==
<highlight-nsis>
StrCpy $0 "$SMPROGRAMS\PwStore"
Call un.DeleteDirIfEmpty
</highlight-nsis>

== The Function ==
<highlight-nsis>
Function un.DeleteDirIfEmpty
  FindFirst $R0 $R1 "$0\*.*"
  strcmp $R1 "." 0 NoDelete
   FindNext $R0 $R1
   strcmp $R1 ".." 0 NoDelete
    ClearErrors
    FindNext $R0 $R1
    IfErrors 0 NoDelete
     FindClose $R0
     Sleep 1000
     RMDir "$0"
  NoDelete:
   FindClose $R0
FunctionEnd
</highlight-nsis>

Comments to 'camillo@rockit.it'

[[Category:Deprecated]]