From 9b9fb7df3a71594f15b6cfce6c0307c7515eaac4 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?St=C3=A9phane=20Adjemian=20=28Charybdis=29?= Date: Fri, 2 Sep 2011 12:28:49 +0200 Subject: [PATCH] Fixed bug. --- matlab/utilities/doc/dynInfo.m | 18 ++++++++++-------- matlab/utilities/tests/dynTest.m | 3 +++ 2 files changed, 13 insertions(+), 8 deletions(-) diff --git a/matlab/utilities/doc/dynInfo.m b/matlab/utilities/doc/dynInfo.m index 4ccc22df5..31dff4973 100644 --- a/matlab/utilities/doc/dynInfo.m +++ b/matlab/utilities/doc/dynInfo.m @@ -8,24 +8,24 @@ function dynInfo(fun) %! @strong{Inputs} %! @table @var %! @item fun -%! string, name of the matlab/octave routine for which internal documentation is needed. +%! string, name of the matlab/octave routine for which internal documentation is needed. %! @end table %! %! @strong{Outputs} %! None -%! -%! @strong{This function is called by:} +%! +%! @strong{This function is called by:} %! @ref{dynare}, @ref{build_internal_documentation} -%! +%! %! @strong{This function calls:} %! @ref{get_internal_doc_block}. -%! +%! %! @end deftypefn %@eod: - + % Copyright (C) 2011 Dynare Team % stephane DOT adjemian AT univ DASH lemans DOT fr -% +% % This file is part of Dynare. % % Dynare is free software: you can redistribute it and/or modify @@ -40,7 +40,9 @@ function dynInfo(fun) % % You should have received a copy of the GNU General Public License % along with Dynare. If not, see . - + +dynare_config([],0); + [pathstr, name, ext] = fileparts(which(fun)); if strcmp(ext(2:end),'m') block = get_internal_doc_block(name,pathstr); diff --git a/matlab/utilities/tests/dynTest.m b/matlab/utilities/tests/dynTest.m index a21a23115..43d4aa6b2 100644 --- a/matlab/utilities/tests/dynTest.m +++ b/matlab/utilities/tests/dynTest.m @@ -41,7 +41,10 @@ function dynTest(fun) % You should have received a copy of the GNU General Public License % along with Dynare. If not, see . +dynare_config([],0); + [pathstr, name, ext] = fileparts(which(fun)); + if ~( isempty(pathstr) || isempty(name) || isempty(ext) ) && strcmp(ext(2:end),'m') check = mtest(name,pathstr); if check