Mercurial > vim
view src/mkinstalldirs @ 7226:9b350a65138a v7.4.922
commit https://github.com/vim/vim/commit/1c2836e268ce930bca9ea1287d0d83e92ce1b3ff
Author: Bram Moolenaar <Bram@vim.org>
Date: Tue Nov 10 21:05:48 2015 +0100
patch 7.4.922
Problem: Leaking memory with ":helpt {dir-not-exists}".
Solution: Free dirname. (Dominique Pelle)
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Tue, 10 Nov 2015 21:15:04 +0100 |
parents | 70c67b1bb1f1 |
children |
line wrap: on
line source
#! /bin/sh # mkinstalldirs --- make directory hierarchy # Author: Noah Friedman <friedman@prep.ai.mit.edu> # Created: 1993-05-16 # Public domain errstatus=0 for file do set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'` shift pathcomp= for d do pathcomp="$pathcomp$d" case "$pathcomp" in -* ) pathcomp=./$pathcomp ;; esac if test ! -d "$pathcomp"; then echo "mkdir $pathcomp" 1>&2 mkdir "$pathcomp" || lasterr=$? if test ! -d "$pathcomp"; then errstatus=$lasterr fi fi pathcomp="$pathcomp/" done done exit $errstatus # mkinstalldirs ends here